Преобразуем выражение к виду, из которого легко перевести в шестеричную систему, затем переведём в неё и посчитаем, сколько получится:
Как видим, была разность двух чисел в шестеричной системе счисления. Первое число состояло из двух единиц и кучи нулей. Вторая единица- после неё было 24 нуля (т.к. в шестеричной системе и есть единица с 24-мя нулями). Потом мы вычли из этого единицу с одним нулём. Получается, у нас из этих 24-ёх нулей, последний останется, а вместо остальных 23-ёх будут стоять пятёрки. Ну, а вместо второй единицы будет ноль.
const M = 10; var a : array [1..M] of integer; i,max, odd : integer; begin odd := 0; {Заполнение массива} for i := 1 to M do begin write('Input a[',i,']:' ); readln(a[i]); end; {Вывод массива на экран} for i := 1 to M do write(a[i]:2,' '); writeln; {Поиск максимального в массиве} max := a[1]; for i := 2 to M do if (a[i] > max) then max := a[i]; writeln('Максимальный элемент массива: ',max); {Поиск всех нечетных чисел в массиве и замена их на 1} for i := 1 to M do if (a[i] mod 2 = 1) then begin a[i] := 1; odd := 666; end; {Вывод сообщения об отсутствии нечетных чисел} if (odd = 0) then writeln('В массиве нечетных чисел нет'); {Вывод преобразованного массива} for i := 1 to M do write(a[i]:2,' '); writeln; readln; end.
В фигурных скобках - комментарии, из программы можно удалять безболезненно. M - количество элементов в массиве. Контрольные примеры для массива из 10 элементов: 1) Массив "1 2 3 4 5 6 7 8 9 10" будет преобразован в "1 2 1 4 1 6 1 8 1 10", максимальный элемент (до преобразования) 10 2) Массив " 2 2 2 2 2 2 2 2 2 2" будет преобразован в " 2 2 2 2 2 2 2 2 2 2", на экран будет выведено сообщение "в массиве нечетных чисел нет", максимальный элемент 2
Как видим, была разность двух чисел в шестеричной системе счисления.
Первое число состояло из двух единиц и кучи нулей.
Вторая единица- после неё было 24 нуля (т.к.
Потом мы вычли из этого единицу с одним нулём.
Получается, у нас из этих 24-ёх нулей, последний останется, а вместо остальных 23-ёх будут стоять пятёрки. Ну, а вместо второй единицы будет ноль.
Итого, в этой записи будет 23 пятёрки.