Создание и использование модулей - Pascal ABC
Формулировка задачи:
Здравствуйте. Добрые люди помогите пожалуйста с данной задачей. Спасибо!!!
Параметр– массив из N целых чисел(N– константа модуля). Действия:
• нахождение минимального элемента;
• нахождение максимального элемента;
• нахождение суммы элементов массива;
• перестановка элементов массива в обратном порядке.
Решение задачи: «Создание и использование модулей»
textual
Листинг программы
uses crt, modul; const N=10; var arr:array[1..N] of integer; i,l:integer; begin l:=N; for i:=1 to N do begin arr[i]:=random(10); write(arr[i],' '); end; writeln(); arrmax(arr); arrmin(arr); arrsum(arr); arrord(arr); end.
Объяснение кода листинга программы
- В первой строке используются библиотеки crt и modul.
- Константа N имеет значение 10.
- Переменная arr представляет собой массив целых чисел размером от 1 до N.
- Переменные i и l имеют значения типа integer.
- Цикл for проходит от 1 до N (N - 1) раз.
- Внутри цикла каждый элемент массива arr[i] присваивается переменной i со случайным значением от 0 до 9 (используется функция random).
- Значение каждого элемента массива выводится на экран с помощью функции write.
- После завершения цикла выводится символ новой строки с помощью функции writeln.
- Функции arrmax, arrmin, arrsum и arrord используются для работы с массивом arr.
- Функция arrmax возвращает максимальное значение из элементов массива arr.
- Функция arrmin возвращает минимальное значение из элементов массива arr.
- Функция arrsum возвращает сумму всех элементов массива arr.
- Функция arrord возвращает порядок элементов массива arr (по возрастанию или убыванию).