Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ

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
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам