Найти произведение цифр заданного черыхехзначного числа. (в паскале,…

Question

37

Найти произведение цифр заданного черыхехзначного числа. (в паскале, неиспользуяцикл)

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

lurpis · Accepted Answer

84

lurpis

15 мая 2023

VAR n, ans: Integer; BEGIN Read (n); ans: =n mod 10; n: =n div 10; ans: =ans*(n mod 10); n: =n div 10; ans: =ans*(n mod 10); n: =n div 10; ans: =ans*(n mod 10); Write (ans); END.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: