khartsiy

29.05.2023 00:40 •  Информатика

Определите, что будет напечатано в результате выполнения следующего алгоритма: 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.