
Фаддей
5 год назад
Пожалуйста посчитайте пожалуйста 1. Найти максимальное значение среди всех элементов массива.2. Найти минимальное значение среди всех элементов массива.3. Найти минимальное и максимальное значения среди всехэлементов массива.(Паскаль)

ОТВЕТЫ

Nicholson Pierce
Oct 24, 2020
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:= ReadlnString('Введите массив').ToIntegers;
Writeln('Максимальное значение: ', a.Max);
Writeln('Минимальное значение: ', a.Min);
end.
// Внимание! Если программа не работает, обновите версию!
begin
var a:= ReadlnString('Введите массив').ToIntegers;
Writeln('Максимальное значение: ', a.Max);
Writeln('Минимальное значение: ', a.Min);
end.
788
Смежные вопросы: