ПОМОГИТ СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ,ПОЖАЛУЙСТА
Приложения:
BobbyFresnel:
Не понял. А где брать его, если его уже нет, он стал на 1 элемент короче)
Походу, Вы в этом вопросе плаваете, лучше с заданием не связываться ))
значит в полученном после удаления
Я задал три вопроса вообще-то.
можете сделать как поняли?
Уверен, что Вы не будете в восторге, если судить, извините, по уровню Вашего понимания вопроса.
Ну т.е. все будет работать, но оно будет Вам абсолютно непонятно.
хорошо
хорошо - это писать или не писать?
писать
Ответы
Ответ дал:
0
===== PascalABC.NET =====
begin
var a := Arr(1, -3, 6, -5, -2, 8, -9, 14, 4, 15, 17, 12, 16, 4);
a.Println;
var im := a.IndexMax;
a := a?[:im] + a?[im + 1:];
a.Println;
Println('min четный =', a.Where(p-> p.IsEven).Min);
Swap(a[5], a[11]);
a.Println;
a := a[:3] + Arr(12) + a[3:];
a.Println
end.
Приложения:
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад