Сформировать массив из 20 вещественных чисел и поменять - вопрос №209555967 от panyaeva06 07.08.2020 08:15

Question

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

panyaeva06 · Answer

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.