Найти максимальный элемент массива - PascalABC.NET
Формулировка задачи:
Найти максимальный элемент массива.
Решение задачи: «Найти максимальный элемент массива»
textual
Листинг программы
- Const
- n = 8;
- a = -20;
- b = 20;
- Var
- arr: Array of System.Int32;
- Begin
- // Заполняем массив случайными значениями.
- arr := ArrGen(n, x -> Random(a, b));
- // Выводим элементы массива.
- arr.Println(', ');
- // Выводим максимальный элемент.
- Writeln(arr.Max);
- // Либо в одну строчку:
- Writeln(ArrGen(n, x -> Random(a, b)).Println.Max);
- End.
Объяснение кода листинга программы
- Объявляются константы: n = 8, a = -20, b = 20.
- Объявляется переменная: arr: Array of System.Int32;
- Присваивается массив случайными значениями: arr := ArrGen(n, x -> Random(a, b));
- Выводится элементы массива через запятую: arr.Println(', ');
- Выводится максимальный элемент: Writeln(arr.Max);
- В одну строчку выводится максимальный элемент и размеры массива: Writeln(ArrGen(n, x -> Random(a, b)).Println.Max);
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д