Var a,b,t,n,p : integer; function f(x: integer): - вопрос №39898888 от Киря0701 26.12.2021 12:17

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.

Киря0701 · 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.