Çàäà÷à . 20058

var a, b, t, N, Z :integer;
Function F(x: integer):integer;
begin
F := 2*(x-5)*(x-5)+4;
end;
BEGIN
a := -10; b := 10;
Z := F(a);
N := 0;
for t := a to b do begin
  if (F(t) <Z) then begin
    N := N+1;
    Z:=F(t);
  end;
end;
write(N);
END.

#include<stdio.h>
int F(int x)
{
 return(2*(x-5)*(x-5)+4); 
} 
int main(void)
{ 
int a, b, t, Z, N; 
a = -10; b = 10; 
Z = F(a); 
N = 0; 
for (t=a; t<= b; t++)
  if (F(t) < Z)
  {
    N++; 
    Z=F(t); 
  }
  printf(″%d″, N);
}