Вывести все натуральные числа на промежутке от a до b, у которых сумма
делителей является числом. Искомые числа следует выводить в порядке
возрастания. Если таких чисел на заданном промежутке не существует, то выведите
фразу Boring segment.
Напоминаем, что натуральное число называется если оно имеет
только два делителя: 1 и само число.
Входные данные: в первой строке вводятся два натуральных числа a и b
(1≤a,b≤3000000).
Выходные данные: искомые числа в порядке возрастания через пробел.

А) последствия событий 13 века: события этого века положили начало отстаиванию земель от стран 'западной европы; золотоордын-ское иго нанесло огромный ущерб . политическому и культурному развитию руси б) океан - главный хранитель воды, давно поражающий исследователей необычностью своих свойств. воды пронизывают всю оболочку и производил в ней разнообразную работу в) симбиоз - это взаимовыгодное отношение двух организмов. плоские черви - паразиты г) всякий равносторонний треугольник есть равноугольный треугольник. прямоугольник с равными сторонами есть квадрат д) язык - один из славянских языков. пунктуация изучат знаки препинания е) пушкин - великий поэт. достоевский - один из популярных писателей ж) информатика зиждется на . компьютер облегчил жизнь человека

Написал на том, что было под рукой: 1C

Если Квартира > ЭтажейВДоме * КвартирНаЭтаже Тогда  

 Сообщить("Нет такой квартиры в доме, мало этажей!");

ИначеЕсли Квартира <= КвартирНаЭтаже Тогда  

 Сообщить("Живет на первом этаже");

Иначе

 ЖиветНа = Цел(Квартира / КвартирНаЭтаже);

 ОстатокЭт = Квартира%КвартирНаЭтаже;

 Если ОстатокЭт>0 Тогда  //

  ЖиветНа = ЖиветНа+1;

 КонецЕсли;

 Если ЖиветНа%2=0 И ЖиветНа=ЭтажейВДоме Тогда // это четный и последний

  ВыходитьНа = ЖиветНа-1;

 ИначеЕсли ЖиветНа%2=0 Тогда // четный в НЕчетный этаж

  ВыходитьНа = ЖиветНа+1;

 Иначе

  ВыходитьНа = ЖиветНа;

 КонецЕсли;

 Сообщить(" Выйдет на: "+ВыходитьНа);

КонецЕсли;