На обработку поступает натуральное число, не превышающее 10^9. нужно написать программу, которая выводит на экран произведение цифр числа, кратных 3. если в числе нет цифр, кратных 3, требуется на экран вывести "no". программист написал программу неправильно. напоминание: 0 делится на любое натуральное число. текст написанной программистом программы (с ошибками): var n, k, digit, prod: longint; begin readln(n); prod : = n mod 10; k : = 0; while (n > 0) do begin digit : = n mod 10; if (digit mod 3 = 0) then begin prod : = prod*digit; k : = k+1; end; n : = n div 10; end; if (k = 0) then writeln('no') else writeln(n) end. найдите все ошибки в этой программе и исправьте их, при этом не меняя весь алгоритм. как правило, ошибок две. я их нашёл, но мне не засчитали. найти ошибки в программе, из-за которых алгоритм работает неверно!