Ответы
Ответ дал:
0
var
a, b, c, i, sum : integer;
begin
read (a, b, c);
sum := 0;
for i := b to c do inc (sum, i);
writeln (sum);
end.
Похожие вопросы
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад