Найти наименьшее из значений компонент с четными номерами - Pascal ABC
Формулировка задачи:
Дан файл f, компоненты которого являются действительными числами. Найти:
а) наименьшее из значений компонент с четными номерами;
б) разность первой и последней компонент файла.
Не выводит результат "наименьшее из значений компонент с четными номерами" вроде все правильно, подскажите где ошибка?
Решение задачи: «Найти наименьшее из значений компонент с четными номерами»
textual
Листинг программы
if i=2 then min:=n else if (odd(i) and (n<min)) then min:=n;
Объяснение кода листинга программы
- Переменная
i
принимает значения от 1 до 20. - Если
i
равно 2, то значение переменнойmin
устанавливается равным значению переменнойn
. - В противном случае, если
i
не равно 2 иn
меньше текущего значенияmin
, то значение переменнойmin
устанавливается равным значению переменнойn
. - Код не использует вложенные списки.
- Код выполняет поиск наименьшего из значений компонент с четными номерами.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д