
Вопрос задан 25.03.2019 в 00:47.
Предмет Информатика.
Спрашивает Никитич Николай.
Дано 2 массива,заполнены случайно.Нужно найти максимальное и минимальное значение. Вывести максимум
и минимум в каждом из массивов.

Ответы на вопрос

Отвечает Лобанова Аня.
// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
begin
for var i:=1 to 2 do begin
var a:=ArrRandom(ReadInteger('n='),1,50).Println(', ');
WritelnFormat('min={0}, max={1}',a.Min,a.Max)
end
end.
Тестовое решение:
n= 13
39, 10, 24, 1, 41, 21, 5, 21, 10, 24, 7, 2, 7
min=1, max=41
n= 10
13, 23, 31, 23, 30, 44, 10, 34, 34, 18
min=10, max=44
begin
for var i:=1 to 2 do begin
var a:=ArrRandom(ReadInteger('n='),1,50).Println(', ');
WritelnFormat('min={0}, max={1}',a.Min,a.Max)
end
end.
Тестовое решение:
n= 13
39, 10, 24, 1, 41, 21, 5, 21, 10, 24, 7, 2, 7
min=1, max=41
n= 10
13, 23, 31, 23, 30, 44, 10, 34, 34, 18
min=10, max=44


Топ вопросов за вчера в категории Информатика

Информатика 2157

Информатика 389

Информатика 19

Информатика 53

Информатика 36

Информатика 13

Информатика 38
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili