Одномерный массив из 6 элементов заполнить случайным образом числами от 5 до 17. поменять местами 5-ый и 7-ой элементы массива, а 4-ый элемент увеличить в 3 раза. вывести на экран монитора первоначальный и преобразованный массивы в строчку. , написать программу в паскале.
216
242
Ответы на вопрос:
Program enot; var a: array [1..6] of integer; i,p: integer; begin for i: = 1 to 6 do a[i]: = random(13)+5; for i: = 1 to 6 do write(a[i]: 4); writeln(); p: =a[5]; a[5]: =a[6]; a[6]: =p; a[4]: =a[4]*3; for i: = 1 to 6 do write(a[i]: 4); end.
Популярно: Информатика
-
СвинкаГоппа08.03.2022 23:21
-
Aliotu01.08.2022 00:46
-
кукушка13718.05.2021 09:05
-
чапмит28.02.2022 08:11
-
кал1220.11.2022 13:02
-
alex2007serg15.08.2020 15:19
-
xelasaa4823.07.2020 22:44
-
Dzjeihunqasanov24.11.2020 05:29
-
Pppddddd08.01.2021 06:17
-
ванёк1006200501.03.2021 13:05