Дано трехзначное число.найти произведение его цифр.составить на языке паскаль (программу) желательно на тетрадьном листе.
lvo2010w
2
17.09.2019 06:10
0
Другие вопросы по теме Информатика
nadialihas2005
26.10.2021 10:16
wolf135791
26.10.2021 10:19
redusoBY
26.10.2021 10:20
drovniashinaan
05.09.2019 05:00
timkaserka
05.09.2019 05:00
fg4ne
20.10.2020 20:48
Kuznetsova8903
20.10.2020 20:48
Fallens0n
20.10.2020 20:47
mares2007
17.07.2019 08:40
Популярные вопросы
- Чи вижив герой твору жага до життя...
3 - Какое несогласованное определение есть в предложении? 1) до сих пор маша...
3 - Назовите годы войны за независимость сша. какие события стали её началом...
2 - Какова масса воды в аквариуме, имеющем размеры 0,6х 0,4х0,5 м? плотность...
3 - Какое государство похоже на трапецию...
2 - На книжной полке 35 книг ,27из них -учебники ,остальные словари.какую часть...
2 - Почему в транскрипции никогда не пишутся ь и ъ?...
3 - Отрицательные герои и положительные из джельсомино и их описания и сравнения...
2 - Грамматическая основа предложения наташа стала икать, вытирая ладошками...
1 - Спиши, распределяя слова по трём колонкам: с буквой о в суффиксе и окончании,...
1
//Версия 3.3, сборка 1627
begin
write(abs(ReadInteger()).ToString().Select(x->x.ToDigit()).Aggregate(Real(1),(x,y)->x*y));
end.
a,com:integer;
begin
Readln(a);com:=1;
while (a>0) do begin
com:= com* (a mod 10);
a:=a div 10;
end;
writeln(com);
end.