Определите, какое число будет напечатано в результате выполнения следующего алгоритма: var a,b,t,M,R:integer;
Function F(x: integer):integer;
begin
F := -2*(x+2)*(x-6);
end;
Begin
a := -11; b := 11;
M := a; R:= F(a);
t:=a;
while t < b do
begin
if (F(t)>R) then
begin
M := t;
R:= F(t);
end;
t:=t+2;
end;
Write(R);
End.
30
Объяснение:
var a, b, t, M, R: integer; // объявляем переменные
Function F(x: integer):integer; // объявляем функцию F
begin
F := -2*(x+2)*(x-6);
end;
Begin // основная программа
a := -11; b := 11; // a = -11; b = 11
M := a; R:= F(a); // M = a = -11; R = F(a). F(a) = -2*(-11+2)*(-11-6)=(-2)*(-9)*(-17) = 306
t:=a; // t = a = -11
while t < b do // пока t < b
begin
if (F(t)>R) then // если F(t) > R
begin // выполнить такие действия:
M := t; // M = t
R:= F(t); // R = F(t)
end;
t:=t+2; // прибавить к t значение 2
end;
Write(R); // вывести R
End.