Написать программу выводящую ** экран все двузначные числа сумма которых равна 10

Question

Написать программу выводящую на экран все двузначные числа сумма которых равна 10

Answer 1

//Pascal
var
  i,j: integer;
begin
  for i:=10 to 99 do
    for j:=-99 to -10 do
      if i+j=10 then writeln(i,' + ',j,' = 10');
end.