Найти максимальный элемент массива - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Найти максимальный элемент массива.

Решение задачи: «Найти максимальный элемент массива»

textual
Листинг программы
  1. Const
  2.   n = 8;
  3.   a = -20;
  4.   b = 20;
  5.  
  6. Var
  7.   arr: Array of System.Int32;
  8.  
  9. Begin
  10.   // Заполняем массив случайными значениями.
  11.   arr := ArrGen(n, x -> Random(a, b));
  12.   // Выводим элементы массива.
  13.   arr.Println(', ');
  14.   // Выводим максимальный элемент.
  15.   Writeln(arr.Max);
  16.   // Либо в одну строчку:
  17.   Writeln(ArrGen(n, x -> Random(a, b)).Println.Max);
  18. End.

Объяснение кода листинга программы

  1. Объявляются константы: n = 8, a = -20, b = 20.
  2. Объявляется переменная: arr: Array of System.Int32;
  3. Присваивается массив случайными значениями: arr := ArrGen(n, x -> Random(a, b));
  4. Выводится элементы массива через запятую: arr.Println(', ');
  5. Выводится максимальный элемент: Writeln(arr.Max);
  6. В одну строчку выводится максимальный элемент и размеры массива: Writeln(ArrGen(n, x -> Random(a, b)).Println.Max);

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы