Написать программу с цикла for. из чисел от 10 до 99 вывести те, сумма которых равна n. n-вводится с клавиатуры. паскаль.

Var
    i, n: integer;

begin
    readln(n);
    
    for i := 10 to 99 do
        if (i mod 10 + i div 10 = n) then
            writeln(i);
end.