При каких значениях (а) выражение 5а-4 принимает положительные значения, меньше 6?
В ответ записать наибольшее целое из этих значений (а)

Определите, какое число будет напечатано в результате выполнения следующего алгоритма:

var a,b,t,M,R:integer;

Function F(x: integer):integer;

begin

  F := 6*(x+10)*(x+10)+30;

end

BEGIN

  a := -5; b := 20; 

  M := a; R:= F(a);

  for t := a to b do begin

    if F(t) > R then begin

      M := t;

      R:= F(t);

    end;

 end;

 writeln(R);

END