Помощь
-
Поиск
-
Пользователи
-
Календарь
Полная версия:
Произведение цифр заданного числа
Форум «Всё о Паскале»
>
Pascal, Object Pascal
>
Задачи
minkod
20.10.2005 23:20
Мне нужно написать программу которая будет считать произведение цифр заданного числа. Как это сделать.
virt
20.10.2005 23:31
s :=
1
;
while
n >
0
do
begin
s := s * (n
mod
10
); n := n
div
10
end
; writeln(s);
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста,
нажмите сюда
.