Ответ:
var a, i:integer;
begin
a:=1;
for i:=1 to 5 do
a:=a+i;
writeln (a);
end.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var a, i:integer;
begin
a:=1;
for i:=1 to 5 do
a:=a+i;
writeln (a);
end.