Question

Требовалось написать программу, при выполнении которой с клавиатуры считывается натуральное число N, не превосходящее 10^9, и выводится произведение цифр этого числа. Программист торопился и написал программу неправильно. (Ниже для Вашего удобства программа представлена на четырёх языках программирования. )var N, product: longint; digit: integer;begin readln(N); product:=N mod 10; while N >= 10 do begin digit:= N mod 10; product:= product*digit; N:= N div 10; end; writeln(product);end. Последовательно выполните следующее. 1. Напишите, что выведет эта программа при вводе числа 532.2. Найдите все ошибки в этой программе (их может быть одна или несколько) . Для каждой ошибки:1)выпишите строку, в которой сделана ошибка;2)укажите, как исправить ошибку, - приведите правильный вариант строки.Обратите внимание, что требуется найти ошибки в имеющейся программе, а не написать свою, возможно, использующую другой алгоритм решения. Исправление ошибки должно затрагивать только строку, в которой находится ошибка.

Answer 1

1) для числа 532 от напечатает 60
2) ошибка: product:=N mod 10;
нужно написать: product:=1;