Опубликовано 6 лет назад по предмету
Информатика
от Jungle22
Найти произведение цифр заданного целого числа. Решить в паскале. Пишу вот такую команду но пишет ошибку.
P := 1; {здесь будет произведение} while n > 0 do begin P := P * (n mod 10); n := n div 10; end;
Войдите или зарегистрируйтесь, чтобы добавить ответ или свой вопрос на сайт