Решить задачу на языке Pascal :

Среди всех двузначных чисел найти двузначное число, равное утроенному произведению его цифр.

1

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

  • Kitsu
  • почетный грамотей
2012-12-08T14:59:25+00:00

var i:integer;

begin

for i:=10 to 99 do

if i=3*(i div 10)*(i mod 10) then writeln(i);

end.