ЮЗ
Юлия Забелло
Дано четырехзначное число. Найти произведение цифр этого числа.
Найти произведение цифр этого числа. Програмирование в Паскале
Найти произведение цифр этого числа. Програмирование в Паскале
Для любого целого типа, необязательно 4-хзначного числа:
p:=1;
while n>0 do begin
p:=p*(n mod 10);
n:=n div 10;
end;