Студенту Мише задали написать функцию, которая получает на вход число и массив из 16 элементов, и возвращает - id2015586020221015 от Лубаша 15.10.2022 02:50

Question

Информатика: Студенту Мише задали написать функцию, которая получает на вход число и массив из 16 элементов, и возвращает номер элемента, равного этому числу. Если таких элементов несколько – годится любой, если их нет, функция должна вернуть -1. Вот алгоритм, реализованный Мишей. 1) Что выведет программа Миши при A=5 для массива 11, 3, 2, 5, 7, 4, 6, 1, 15, 8, 12, 10, 9, 5, 20, 14? 2) Для каких из приведённых ниже массивов алгоритм Вовы будет работать верно при любом A? ответ обоснуйте. а) 13, 13, 13, 13, 13,

Лубаша · Accepted Answer

Сначала надо избавиться от ошибок (пункт №3)
иначе не сможем выполнить 1 и 2 пункт задания.
Исправляем 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;

После исправления ошибок при вводе 537 получим 3
Программа будет работать правильно для любого числа,
у которого вторая цифра слева меньше первой цифры, например:
7193

Чтобы программа работала правильно для всех чисел надо
изменить это: while N > 10 do на while N > 0 do

После всех исправлений код программы стал таким:
var
N, k: integer;
begin
readln(N);
k := 9;
while N > 10 do
begin
if (N mod 10 < k) then k := N mod 10;
N := N div 10;
end;
write(k)
end.

MOGZ ответил