program summa;
var
res, a, i, j: integer;
begin
a := 2;
for i := 2 to 10 do
for j := 2 to i do
a := 2 * a
end;
res := a + res;
writeln(res);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program summa;
var
res, a, i, j: integer;
begin
a := 2;
for i := 2 to 10 do
begin
for j := 2 to i do
begin
a := 2 * a
end;
res := a + res;
a := 2;
end;
writeln(res);
end.