Помогите составить программу решения задачи в паскаль АВС. Даны два целых числа А и В (А меньше В). Найти сумму всех целых чисел от А до В включительно.
Answers & Comments
HRAshton
Var a, b, c, i: integer; begin readln(a, b); for i := a to b do c := c + i; writeln(c); end.
Answers & Comments
begin
readln(a, b);
for i := a to b do c := c + i;
writeln(c);
end.
Проверил)