Составьте программу которая выводит на экран все двухзначные числа сумма цифр которых равна 7

program n_1;var i,a:integer;  begin        for i := 10 to 99 do  begin      a := i mod 10 + i div 10;        if a = 7 then          writeln(i);    end  end.