Водномерном массиве а=(а1, ) отрицательные элементы, имеющие четный порядковый номер, переписать в начало массива.
249
347
Ответы на вопрос:
Var a: array[1..6]of integer; i,m: integer; begin for i: =1 to 6 do read(a[i]); writeln(' '); for i: =2 to 6 do if (a[i]< 0) and ((i mod 2) =0) then for m: =i downto 2 do swap(a[m],a[m-1]); for i: =1 to 6 do write(a[i]: 2); end.abc pascal
Популярно: Информатика
-
Theonly138589427.03.2022 13:45
-
vasa228305.07.2020 10:30
-
sabinaqUliyeva02.05.2023 10:50
-
Dog211122.03.2021 12:25
-
xach505.08.2021 14:39
-
then3rvnyy05.10.2021 19:21
-
Лиза09040108.11.2022 14:50
-
Ника351514.05.2022 04:19
-
evrolokki19.01.2021 01:12
-
gaydukov13022.01.2020 22:32