Требуется написать программу при выполнении которой с клавиатуры считывается натуральное число n, не превосходящее 10 в девятой степени, и выводится

Question

Информатика: Требуется написать программу при выполнении которой с клавиатуры считывается натуральное число n, не превосходящее 10 в девятой степени, и выводится произведение цифр этого числа.

MrWolf1244 · Answer

uses crt; var p,n:integer;beginp:=1;write( N= );read(n);while n 0 do beginp:=p*(n mod 10);n:=n div 10;end;writeln( p= ,p);end....

Популярные вопросы