среди всех двузначных чисел найдите те у которых произведение цифр равно самому числу

1

Ответы и объяснения

  • Sky09
  • профессор
2013-11-30T14:24:00+00:00
Var i:integer;
begin
  for i:=10 to 99 do
    if (i mod 10)*(i div 10)=i then writeln(i);
end.
---
Но насколько мне известно, среди двузначных чисел таковых не имеется.
А, следовательно, программа не даст ответа.