Решение олимпиадной задачи по информатике


"Помогите незнайке" (10 баллов). На уроке математики Мария Ивановна предложила Незнайке решить такую задачу: "Заданы два целых числа A и B (0 ≤ A ≤ B ≤ 30000). Требуется найти сумму S всех целых чисел X таких, что A < X < B".
Помогите Незнайке: составьте программу решения этой задачи. Значения A и B нужно ввести с клавиатуры, значение S вывести на экран монитора.

Формат ввода
A
B
Формат вывода
S


Решение:
var a, b, s, i: integer;
begin
write('Введите A: ');
readln(a);
write('Введите B: ');
readln(b);
s:=0;
for i:=a to b do
s:=s+i;
writeln(s);
end.
скачать dle 10.6фильмы бесплатно

Метки: Информатика



  • Не нравится
  • +1
  • Нравится


    Уважаемый посетитель, Вы зашли на сайт как незарегистрированный пользователь.
    Мы рекомендуем Вам зарегистрироваться либо войти на сайт под своим именем.

    • wink winked smile am
      belay feel fellow laughing
      lol love no recourse
      request sad tongue wassat
      crying what bully angry