Çàäà÷à . 15797

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

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