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

Пожалуйста посчитайте , срочно!!!Информатика, 9 классКоманда Циклу (for)Задание 1:З клавіатури вводиться два числа. Знайти суму чисел, які розміщені між ними.

ОТВЕТЫ

var a,b,s: integer;

begin

s:=0;

readln (a);

readln(b);

b:=b-1;

for a:=a+1 to b do begin

s:=s+a;

end;

writeln(s);

end.

714
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам