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