Çàäà÷à . 15807

var a,b,t,M,R:integer;
Function F(x: integer):integer;
begin
  F := 2*(x-9)*(x-9)+12;
end;
BEGIN
  a := -20; b := 20;
  M := a; R:= F(a);
  for t := a to b do
    if (F(t)<R) then begin
      M := t;
      R:= F(t);
    end;
  write(M);
END.

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