Найти двузначное число, равное утроенному произведению его цифр. Ответ: 15,24.
Найти двузначное число, равное утроенному произведению его цифр. Ответ: 15,24.
Гость
Ответ(ы) на вопрос:
Гостьvar i,j:integer;
begin
for i:=1 to 9 do
for j:=0 to 9 do
if i*10+j = 3*i*j then writeln(i*10+j);
end.
Результат:
15
24
ГостьЕсли надо программу для поиска такого числа, то как вариант:
//Pascal
var i:integer;
begin
for i:=10 to 99 do
if (i=(i div 10 * i mod 10) *3) then writeln(i);
end.
ответ:
15
24
Не нашли ответ?
Похожие вопросы