Çàäà÷à . 20059

var a, b, t, N, Z :integer;
Function F(x: integer):integer;
begin
F := 2*(x-5)*(3-x)+4;
end;
BEGIN
a := 2; b := 9;
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)*(3-x)+4); 
} 
int main(void)
{ 
 int a, b, t, Z, N; 
 a = 2; b = 9; 
 Z = F(a); 
 N = 0; 
 for (t=a; t<= b; t++)
{
  if (F(t) <Z) 
  {
    N++; 
    Z=F(t); 
  }
}
printf(″%d″, N);
}