Паскаль
var s:integer;
begin
s:=0;
for i=1 to 5 do
s:=s+i;
writeln('Сумма чисел=',s);
end;
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Паскаль
var s:integer;
begin
s:=0;
for i=1 to 5 do
s:=s+i;
writeln('Сумма чисел=',s);
end;