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

valeriehunt    1   21.05.2019 06:00    1