Ответ(ы) на вопрос:
program dlavas;
uses crt;
var
i, k, a, b:integer;
begin
readln(a);
readln(b);
k:=0;
for i:=a to b do
k:=k+i;
writeln(k);
readln;
end.
это будет работать для любых чисел
Не нашли ответ?
Похожие вопросы