напишите программу которая ищет два таких натуральных числа в интервале от 1 до 100, что первое число меньше второго на 9, а сумма цифр первого числабольше суммы цифр второго тоже на 9
var i,k:integer; Begin for i := 1 to 91 do begin k:=i+9; if (i div 10) + (i mod 10) - (k mod 10) - (k div 10) = 9 then writeln(i,k); end; writeln('e'); End. кароче нет таких
