Question

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

Answer 1

Ответ:

Очень странно: какие это двузначные числа, сумма которых равна 10????? Может, сумма цифр равна 10? Pascal:

var

  i: integer;

begin

 for i := 10 to 99 do

 begin

   if ((i div 10) + (i mod 10) = 10) then

     WriteLn(i, ' - сумма цифр равна 10');

   if ((i mod 2) = 1) then

     WriteLn(i, ' - нечетное число');

 end;

end.

Объяснение: