Найдите сумму чисел от a до b pascal

Найдите сумму чисел от a до b pascal

Задать свой вопрос
Арсений
begin Range(ReadInteger, ReadInteger).Sum.Printlnend.
1 ответ

check comment ( pls delete )

Бекельман Нелли
сумму всех чисел от a до b
Ева Бархалова
Ну... Либо я что-то не верно сообразил? Поясни..
Jemilija
a = 1, b = 5, Sum = 1 + 2 + 3 + 4 + 5
Денис Малушков
А. Понял. Оке. Сорян.
Тоня
Заведите переменную Sum, воткните цикл от a до b и просуммируйте
Kashkaev Ruslan
var a, b, Sum, i: integer;begin Read(a, b); Sum := 0; for i := a to b do Sum := Sum + i; Write(Sum)end.
Василиса
А. Ля. Так. Ладно, вы теснее кинули ответ. Поэтому.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт