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

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