Решить задачу на языке Pascal :
Среди всех двузначных чисел найти двузначное число, равное утроенному произведению его цифр.
var i:integer;
begin
for i:=10 to 99 do
if i=3*(i div 10)*(i mod 10) then writeln(i);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var i:integer;
begin
for i:=10 to 99 do
if i=3*(i div 10)*(i mod 10) then writeln(i);
end.