6) среди всех двузначных чисел указать те, сумма цифр которых больше 15. 7) дано натуральное двузначное число n. найти и вывести все числа в интервале от 1 до n-1, у которых сумма всех цифр совпадает с суммой цифр данного числа. если таких чисел нет, вывести слово "нет". пример: n=44. числа: 17,26,35. напишите решение на языке паскаль, используя(если их надо использовать) циклы: цикл "пока" и цикл "до"
var
i,x : integer;
begin
read(x);
for i := 10 to 99 do begin
if (i mod 10) + (i div 10) = x then
writeln(i);
end;
readln;
end.