Question

Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
var a,b,t,M,R:integer;
Function F(x:integer):integer;
begin
F := 3*(x-8)*(x-8)
end;
begin
a := -20; b := 20;
M := a; R:= F(a);
for t := a to b do begin
if (F(t) < R) then begin
M := t;
R:= F(t)
end
end;
write(M);
end.

Answer 1

Ответ 8. Выполняя программу мы получили ответ 8