PascalABC.NETИз чисел от 10 до 99 вывести те, сумма цифр которых

PascalABC.NET
Из чисел от 10 до 99 вывести те, сумма цифр которых одинакова S

Задать свой вопрос
Виктория Шихмурзаева
Чему одинаково S?
Тамара Прутко
хоть какое число
1 ответ
// PascalABC.NET 3.2, сборка 1379 от 21.01.2017
// Внимание! Если программка не работает, обновите версию!

begin
  var s:=ReadInteger('S=');
  Range(10,99).Where(m-gt;(m div 10)+(m mod 10)=s).Println
end.

Пример
S= 7
16 25 34 43 52 61 70

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт