Требовалось написать программу, при выполнении которой с клавиатуры считывается натуральное число 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.Укажите все ошибки в программе и исправьте их.Для этого для каждой ошибки выпишите строку ,которая написана неправильно и приведите правильный вариант строки.

15 Апр 2020 в 19:40
240 +1
1
Ответы
1

При вводе числа 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;
18 Апр 2024 в 13:56
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир