Аватар
Информатика, опубликовано 2018-08-22 21:48:07 by Гость

Помогите составить программу решения задачи в паскаль АВС. Даны два целых числа А и В (А меньше В). Найти сумму всех целых чисел от А до В включительно.

Аватар
Ответ оставил Гость

Var a, b, c, i: integer;
begin
     readln(a, b);
     for i := a to b do c := c + i;
     writeln(c);
end.

Проверил) 

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.