Question

Определите, какое число будет напечатано в результате выполнения следующего алгоритма:

var a, b, t, N :integer;

Function F(x: integer):integer;

begin

F := 16*(9-x)*(9-x)+127;

end;

BEGIN

a := -20; b := 20;

N := 0;

for t := a to b do begin

if (F(t) >= 0) then begin

N := N+1;

end;

end;

write(N);

END.
помогите пожалуйста. нахождение нужно прям расписать

Answer 1

Значение функции F всегда больше нуля.
цикл будет выполняться от -20 до 0 двадцать раз
0 двадцать первый раз
от 0 до 20 ещё двадцать
Итого Сорок один