Заполните массив на 50 элементов целыми значениями, - вопрос №548238650 от AliceMagic 29.04.2023 04:37

Question

Информатика: Заполните массив на 50 элементов целыми значениями, лежащими в диапазоне от -22 до 15, и организуйте вывод элементов с индексами от 14 до 34

AliceMagic · Answer

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var a:=ArrRandom(50,-22,15); a.Println; Println;
13.To(33).Select(i->a[i]).Print
end.

Тестовое решение:
4 -21 6 -12 -5 -16 14 -4 -7 -13 5 -4 10 -7 -9 7 13 4 -3 -9 -11 -10 15 -16 15 7 10 0 -11 -5 5 14 -13 -7 6 -1 7 6 2 -15 -16 -7 -19 -19 -17 -6 -15 7 -8 1

-7 -9 7 13 4 -3 -9 -11 -10 15 -16 15 7 10 0 -11 -5 5 14 -13 -7