Предмет: Информатика, автор: shik96

Помогите пожалуйста решить оба задания

Приложения:

Ответы

Автор ответа: BobbyFresnel
0

===== PascalABC.NET =====

begin

 // 1

 var a := ArrRandom(20, -99, 99);

 a.Println;

 a := (a[::2].Sorted).Interleave(a[1::2].SortedDescending).ToArray;

 a.Println;

 // 2

 Writeln;

 var b := MatrRandom(5, 6, -99, 99);

 b.Println(4);

 Writeln;

 var c := b.Rows.Select(row -> row.Max).ToArray;

 c.Println

end.

Приложения:

shik96: Спасибо огромное!
Интересные вопросы
Предмет: Алгебра, автор: person4884
Предмет: Химия, автор: popovaksyusha20