Var a,b,t,n,p : integer; function f(x: integer): - вопрос №98984883 от titarenko1953 04.03.2023 10:39

Question

Информатика: Var a,b,t,n,p : integer; function f(x: integer): integer; begin f : = 3*(9-x)*(9-x)+12; end; begin a : = -10; b : = 10; p : = 25; n : = 0; for t : = a to b do begin if (f(t) p) then begin n : = n+1; end; end; write(n); end.

titarenko1953 · Answer

программа выдает число 17 что бы это не значило......

Var a,b,t,n,p : integer; function f(x: integer): integer; begin f : = 3*(9-x)*(9-x)+12; end; begin a : = -10; b : = 10; p : = 25; n : = 0; for t : = a to b do begin if (f(t) > p) then begin n : = n+1; end; end; write(n); end.

Var a,b,t,n,p : integer; function f(x: integer): integer; begin f : = 3(9-x)(9-x)+12; end; begin a : = -10; b : = 10; p : = 25; n : = 0; for t : = a to b do begin if (f(t) > p) then begin n : = n+1; end; end; write(n); end.