Сформировать массив из 20 вещественных чисел и поменять местами 5 и 10 элемент.

Rookgolf60 Rookgolf60    2   02.10.2019 07:20    3

Ответы
аишамамедова аишамамедова  17.08.2020 06:45
PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := SeqRandomReal(20, -99, 99)

     .Select(t -> Round(t, 1)).ToArray;

 a.Println;

 Swap(a[4], a[9]);

 a.Println

end.


Сформировать массив из 20 вещественных чисел и поменять местами 5 и 10 элемент.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика