Çàäà÷à . 1488

var a,b,t,M,R:integer;
Function F(x:integer):integer;
begin
  F:=(5-x)*(x+3);
end;
BEGIN
  a:=-20; 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;
  write(R);
END.

#include<stdio.h>
int F(int x)
{
return  (5-x)*(x+3);
}
main()
{
     int a=-20,b=20,M, R;
     M=a; R=F(a);
 for(int t=a;t<= b;t++)
    if (F(t)>R)
    {
      M=t;
      R=F(t);
    }    
 printf("%d",R);
}