Ответ:
Объяснение:
var
a,b,c,i:integer;
begin
read(a,b);
c:=0;
for i:=a to b do
c:=c+i;
end;
write(c);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Объяснение:
var
a,b,c,i:integer;
begin
read(a,b);
c:=0;
for i:=a to b do
begin
c:=c+i;
end;
write(c);
end.