Регистрация
irror404
Есть ответ 👍

Будь ласка, до іть, терміново

158
259
Посмотреть ответы 1

Ответы на вопрос:

Кряквочка
Кряквочка
4,5(25 оценок)
Var 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.

Популярно: Немецкий язык