Сначала надо избавиться от ошибок (пункт №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.
1)Информационная модель (в широком, общенаучном смысле) — совокупность информации, характеризующая существенные свойства и состояния объекта, процесса, явления, а также взаимосвязь с внешним миром.
Основные свойства любой модели: упрощенность - модель отображает только существенные стороны объекта и, кроме того, должна быть проста для исследования или воспроизведения; ... полнота - в модели должны быть учтены все основные связи и отношения, необходимые для обеспечения цели моделирования. 2) Моделирование - метод познания, состоящий в создании и исследовании моделей, т. ... исследование объектов путем построения и изучения моделей. Модель - некоторое упрощенное подобие реального объекта, который отражает существенные особенности (свойства) изучаемого реального объекта, явления или процесса. 3) Математические модели Математическая модель — приближенное описание объекта моделирования, выраженное с математической символики. ... Огромный толчок развитию математического моделирования придало появление ЭВМ. 4) Табличные информационные модели
Иерархические информационные модели
Сетевые информационные модели 5) Матрица представляет собой прямоугольную таблицу элементов, в качестве которых могут выступать числа, функции, символы, слова и так далее - при условии, что заданы определенные правила математических действий с этими элементами. Примеры матриц: ... Строки матрицы нумеруются сверху вниз, а столбцы – слева направо
Двоичная матрица это матрица, в который каждый элемент может принимать либо значение "0", либо значение "1". ... Если матрица содержит только нули и единицы, то она называется двоичной матрицей. 6) Διάγραμμα (diagramma) — изображение, рисунок, чертёж) — графическое представление данных линейными отрезками или геометрическими фигурами, позволяющее быстро оценить соотношение нескольких величин. Представляет собой геометрическое символьное изображение информации с применением различных приёмов техники визуализации. 7) График — линия, дающая наглядное представление о характере зависимости какой- либо величины (например, пути) от другой (например, времени). График позволяет отслеживать динамику изменения данных. Круговая диаграмма служит для сравнения нескольких величин в одной точке.
иначе не сможем выполнить 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.