program var_27_task_1;

{$APPTYPE CONSOLE}

{$R *.res}

uses
    System.SysUtils, Math;

var
    I : Integer;
    MaxValue, Y : Real;

begin
    for I := 1 to 3 do
        Y := Sin((I*PI*5)/180);
        if Y>=MaxValue then
            begin
                MaxValue := Y;
            end;
    WriteLn('Biggest f(x) value = ', MaxValue);
    Writeln('Press <enter> to quit...');
    Readln;
end.