Написать на паскале: Из чисел от 10 до 99 вывести те, сумма цифр которых равна s (sgt;0; slt;18) Cрочно!

Question

Написать на паскале: Из чисел от 10 до 99 вывести те, сумма цифр которых равна s (sgt;0; slt;18) Cрочно!

Информатика

Написать на паскале: Из чисел от 10 до 99 вывести те, сумма цифр которых равна s (s>0; s<18) Cрочно!

Гость

Ответ(ы) на вопрос:

Accepted Answer

//Pascal ABC.NET 3.1 сборка 1219 begin var a:=ReadInteger(); writeln(range(10,99).where(x -> (x mod 10)+(x div 10)=a)); end. Пример ввода: 13 Пример вывода: [49,58,67,76,85,94]