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

PascalABC.NET Из чисел от 10 до 99 вывести те, сумма цифр которых равна S
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1379 от 21.01.2017 // Внимание! Если программа не работает, обновите версию! begin   var s:=ReadInteger('S=');   Range(10,99).Where(m->(m div 10)+(m mod 10)=s).Println end. Пример S= 7 16 25 34 43 52 61 70
Не нашли ответ?
Ответить на вопрос
Похожие вопросы