Напишите функцию которая находит максимальный элемент переданного ей динамического массива (паскаль)

Хотите узнать готовый ответ на вопрос Напишите функцию которая находит максимальный элемент переданного ей динамического массива (паскаль) и правильно решить домашнее задание по предмету Информатика? Подробное решение смотрите ниже.

Напишите функцию которая находит максимальный элемент переданного ей динамического массива (паскаль)

// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

function amax(a:array of integer):integer;
begin
Result:=a.Max
end;


begin
var x:=ArrRandom(ReadInteger('n='),-50,50); x.Println;
Writeln('Максимальный элемент равен ',amax(x))
end.

Пример
n= 15
-21 9 27 -46 -17 -21 22 50 -50 -47 -20 43 -23 43 -46
Максимальный элемент равен 50

Похожие ответы

Дано натуральное число х. Вывести на экран квадраты целых натуральных чисел, не пвышающие число х. Дано: 25 Найти: 1 4 9 16 25
Дано натуральное число х. Вывести на экран квадраты целых натуральных чисел, не пвышающие число х.
Помогите пожалуйста , нужно срочно !
Помогите пожалуйста , нужно срочно !
Даны стороны треугольника abc определить является ли треугольник равнобедренным.Напишите программу на паскале
Даны стороны треугольника abc определить является ли треугольник равнобедренным.Напишите программу