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


var a,b:integer;
begin
a:=1;
b:=1;
while abs(b)<100
do begin
d:=b*(-1);
a:=3*a+b;
b:=a*b;
end;
writeln(b);
end.

Ответ :  7168
.................................... 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку