задача 1.
заполнить массив из 10 элементов случайными числами в интервале -10..10 и выполнить циклический сдвиг влево без первого элемента
задача 2.
заполнить массив из 10 элементов случайными числами в интервале 0..4 и вывести номера всех элементов равных x

// PascalABC.NET 3.31.begin  var a:=ArrRandom(10,-10,10); a.Println;  a:=a[1:]; a.Println;end.Пример:7 4 0 -4 0 8 5 -6 -9 -84 0 -4 0 8 5 -6 -9 -82.begin  var a:=ArrRandom(10,0,4); a.Println;  var x:=ReadInteger('x =');  a.IndexesOf(z->z=x).Select(z->z+1).Println;end.Пример:2 1 3 0 4 2 3 2 3 0x = 33 7 9