Требовалось написать программу, при выполнении которой с клавиатуры считывается натуральное число N, не превосходящее 10^9, и выводится минимальная цифра этого числа. Программист торопился и написал программу неправильно. PASCAL var N,k:integer; begin readln(N); k:=9; while N > 10 do begin if N mod 10 k:=N mod 10; N:N div 10; end; write(k) end. Последовательно выполните следующее. 1. Напишите, что выведет эта программа при вводе числа 537? 2. Приведите пример такого числа при котором программа работает верно 3.Укажите все ошибки в программе и исправьте их.Для этого для каждой ошибки выпишите строку ,которая написана неправильно и приведите правильный вариант строки.
При вводе числа 537 программа выведет 7.
Пример такого числа, при котором программа работает верно: 289.
Ошибки в программе и их исправления:
if N mod 10 k:=N mod 10;Правильно: if N mod 10 < k then k:=N mod 10;N:N div 10;
Правильно: N:=N div 10;