Var a,b : integer;

begin
a: =10;
for b: =0 to 5 do
a: =4*a+2*b;
writeln(a);
end.

Asuna2001    3   13.09.2019 17:27    1