Найти сумму элементов принадлежащих промежутку от a до b , a и b вводятся с клавиатуры
churakova03
1
20.03.2019 00:40
24
Другие вопросы по теме Информатика
goroskopy
07.12.2019 17:56
Dashalu45
07.12.2019 17:55
HimikHEH
07.12.2019 17:48
DariaGuskova1
07.12.2019 17:45
dudka283847
07.12.2019 19:07
Luuunar
07.12.2019 19:02
Malayalam
07.12.2019 18:55
АннаФайна
07.12.2019 18:49
Популярные вопросы
- у меня сор Идеальный газ отдал количество теплоты 500 Дж и при этом внутренняя...
1 - Найти множество значений функции y=|x|-5...
3 - ДОБРЫЙ ЛЮДИ, переведите словосочетания под номерами 31 и 32...
2 - Задача хi 1,2,3,4,5,6 wi 0,4;0,06;0,12;0,6;0,44;0,18. ni=?...
3 - первый станок ха 4 дня делает 120 чипсов второй 440 за 8 дней сколько...
1 - написать обозначения и единицы измерения следующих величин:масса, молярная...
3 - Прочитайте приведённый ниже текст, в котором пропущен ряд слов (словосочетаний)....
1 - What is the place like? What are the people like? ответить на эти вопросы...
3 - выполните синтаксический разбор предложений : Целью стратегии является...
2 - С 13. Текстти окуп, жуптарда кеңешип, суроолорго жооп бергиле. Абу Али...
3
var a,b,s,i:integer;
begin
readln(a,b);
if a>b then
for i:=b to a do
s:=s+i
else
for i:=a to b do
s:=s+i;
writeln(s);
end.