Поменять местами первое положительное число с последним отрицательным числом в одномерном массиве из n целочисленых элементов (программа для pascalabc )

//PascalABC.NET 3.1 сборка 1239
begin
    var a:=ArrRandomInteger(10,-10,10);
    Println(a);
    
    var i :=a.FindIndex(x->x>0);
    var j:=a.FindLastIndex(x->x<0);
    swap(a[i], a[j]);
    Println(a);
end.

WordArt — это коллекция текстовых стилей, которые можно добавлять в публикации для создания декоративных эффектов, таких как тени или отраженный текст. WordArt можно использовать для добавления в документ специальных текстовых эффектов. Например, вы можете растянуть заголовок, наклонить текст, вписать текст в фигуру или применить градиентную заливку. Объект WordArt можно перемещать или размещать в документе, чтобы украсить его или акцентировать внимание на чем-либо. Вы можете в любой момент изменить или дополнить текст в существующем объекте WordArt.

Объяснение:

1д ж о й с т и 3к  6т          

      л  р  8н        

     5к а м е р а    9м ы ш ь

      в  к  у    о    

2к о л о н к и  б  ш    н    

      а  о  н  11п  и    

4п л а н ш е т  л  и  л  т    

      у    к  о  о    

 7с к а н е р  10п р и н т е р    

      а      т      

            е      

         12м и к р о ф о н  

                 

                 

                 

                 

                 

                 

                 

По горизонтали: По вертикали:

1. джойстик

2. колонки

4. планшет

5. камера

7. сканер

9. мышь

10. принтер

12. микрофон 3. клавиатура

6. трекбол

8. наушники

9. монитор

11. плоттер