С клавиатуры вводится целое число…

Question

С клавиатуры вводится целое число n. Найти произведение всех цифр этого числа а так же колличество большихшести

Answer 1

52

alex99sd

21 февраля 2023

Uses crt; var n,a,k,s: integer; beginreadln (n); a: =n; repeat; a: =n mod 10; s: =s+a; n: =n div 10; if a>6 then inc (k); until a=0; writeln (s); writeln (k); end.

пользователи выбрали этот ответ лучшим

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

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

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

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