Dagdaghma
4 год назад
СРОЧНО!!!Число Цукамерна - натуральное число, которое делится на произведение своих цифр, например 175 делится на 1*7*5=35. Составить программу, которая выводит на экран все трёхзначные числа Цукамерна.Пожалуйста Пожалуйста посчитайте!!!
ОТВЕТЫ
Gerda
Oct 24, 2020
var k,a,b,c,l:integer;
begin
readln(k);
a:=k div 100;
b:=k div 10 mod 10;
c:=c mod 10;
l:=a*b*c;
if (k mod l=0) then writeln(k);
end.
begin
readln(k);
a:=k div 100;
b:=k div 10 mod 10;
c:=c mod 10;
l:=a*b*c;
if (k mod l=0) then writeln(k);
end.
328
Смежные вопросы: