
Полуект
4 год назад
Даны два числа A и B (A<B). Найти сумму всех целых чисел от А до В включительно. Решить задачу используя циклическую конструкцию for. Обязательно в языке Паскаль
ОТВЕТЫ

Frei Krista
Oct 24, 2020
var a, b, i, s:integer;
begin
readln(a, b);
s:=0;
for i:=a to b do s:=s+i;
write(s);
end.
648
Смежные вопросы: