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).Printlnend.ПримерS= 716 25 34 43 52 61 70