tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Задается положительное
Задается положительное целое число n. нужно вывести произведение его цифр.
tolkov05
2 18.06.2019 17:01
0
Ответы
NaTaShA0930
02.10.2020 04:48
Var s,n:integer;
begin
Readln(n);
s:=1;
repeat
s:=s*(n mod 10);
n:=n div 10;
until n=0;
Writeln(s);
Readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
pavlushkaaa
07.07.2019 16:30
Число 30114011 может существовать в системах счисления с основанием. 1)5 и 8 2) 2 и 3 3)4и 3 4)3 и 10 5)2 и 4...
dradya
07.07.2019 16:30
Перечислите составляющие окна программы ворд...
veyper1
07.07.2019 16:30
Сортировка положительных элементов методом прямого выбора .программа паскаль программа вот. const n=20; var a: array[1..n] of integer; i,j,k,x: integer; begin randomize; writeln( исходная...
annsamoilenko16
07.07.2019 16:30
Вы подошли к светофору, когда горел зелёный свет. после этого загорелся желтый. какое количество вы информации вы при этом получили. 1) 1 бит 2) 2 бита 3) 0 бит 4) 1 байт 5) 2 байта...
2005282
07.07.2019 16:30
Рассчитать объём растра индексированного изображения 128 цветов изображения при следующих параметрах: n = 2400 и m=2048. ответ дать в битах...
koskol84p08pdw
07.07.2019 16:30
Когда появились первые программы для компьютерного тестирования?...
6hh6h6h
07.07.2019 16:40
Какие действия нужно выполнить перед началом набора текста в программе ворд?...
Санжик707
18.05.2021 09:21
Необходимо нарисовать 7 одинаков(-ых, -ые, -ую) вертикальн(-ых, -ые, -ую) палоч(-ек, -ки, -ку). Дан алгоритм. Выбери верный ответ: использовать Чертёжник алг чёрточки11 нач сместиться...
AliMsi
03.03.2021 12:19
Укажите команду которая возводит число в степень * a= math.sqrt(64)a= math.pow(6,4)a = math.fabs(64)a = math.factorial(64)...
ianastepanenko
03.03.2021 12:20
Какие классификации языков программирование существует ??(несколько вариантов ответа) * языки низкого уровняязыки высокого уровняязыки наивысшего уровняязыки человеческого уровня...
Популярные вопросы
В состав какой международной организации, возникшей на постсоветском пространстве,...
1
Какова промышленная специализация стран Восточной Азии?...
3
Какое государство Зарубежной Азии лидирует по показателю средней плотности населения?...
2
Может ли китайская Народная Республика стать политическим и экономическим лидером...
3
Почему Турция занимает особое место в составе Юго-Западной Азии?...
3
Какова хозяйственная специализация стран Юго-Восточной Азии?...
1
Можно ли Восточную, Южную и Юго-Восточную Азию объединить в единый социально-экономический...
3
Что такое Азиатско-Тихоокеанский регион?...
1
Какие отрасли хозяйства развиты в странах Центральной Азии?...
3
Какие страны Восточной Азии претендуют на роль мировых лидеров?...
2
begin
Readln(n);
s:=1;
repeat
s:=s*(n mod 10);
n:=n div 10;
until n=0;
Writeln(s);
Readln;
end.