Предмет: Информатика,
автор: ЛинаМинская
Пожалуйста,9 класс! Информатика 3 задачии
Приложения:
Ответы
Автор ответа:
0
// PascalABC.NET 3.3
// Cборка 1590 от 03.12.2017
1)
begin
var a:=ArrRandom(10,1,10); Println('Исходный массив:'); a.Println;
swap(a[1],a[8]); Println('Полученный массив:'); a.Println;
end.
Пример:
Исходный массив:
5 10 10 2 3 5 5 7 3 9
Полученный массив:
5 3 10 2 3 5 5 7 10 9
2)
begin
var a:=ArrRandom(8,1,100); Println('Исходный массив:'); a.Println;
Println('Масимальное:',Range(0,6,2).Select(i->a[i]).Max);
end.
Пример:
Исходный массив:
50 10 18 75 2 54 86 30
Масимальное: 86
// Cборка 1590 от 03.12.2017
1)
begin
var a:=ArrRandom(10,1,10); Println('Исходный массив:'); a.Println;
swap(a[1],a[8]); Println('Полученный массив:'); a.Println;
end.
Пример:
Исходный массив:
5 10 10 2 3 5 5 7 3 9
Полученный массив:
5 3 10 2 3 5 5 7 10 9
2)
begin
var a:=ArrRandom(8,1,100); Println('Исходный массив:'); a.Println;
Println('Масимальное:',Range(0,6,2).Select(i->a[i]).Max);
end.
Пример:
Исходный массив:
50 10 18 75 2 54 86 30
Масимальное: 86
Похожие вопросы
Предмет: Окружающий мир,
автор: sevka1802
Предмет: Литература,
автор: dianka0aaaa
Предмет: История,
автор: akaofficial2008
Предмет: Математика,
автор: Самира20051
Предмет: Химия,
автор: LYKOVSLAVA