Что вычисляется?
const
Sz = 100;
var
a: array [1..Sz] of integer;
N: integer;
begin
N := 20;
a[1] := 2;
for var i:=2 to N do
a[i] := a[i-1] * 2;
writeln('Степени двойки: ');
for var i:=1 to N do
writeln(i:3,a[i]:9);
end.​

brain09    1   11.04.2020 22:02    4