Ответы на вопрос:
Program mas; var mas, p_mas: array[1..15] of integer; i: integer; begin randomize; for i: = 1 to 15 do begin mas[i] : = random(6) + 7; p_mas[i] : = mas[i]; end; mas[8] : = mas[10] + 5; mas[10] : = mas[13]; writeln('первоначальный массив: '); for i : = 1 to 15 do write(p_mas[i], ' '); writeln(crlf + 'изменённый массив: '); for i : = 1 to 15 do write(mas[i], ' '); end.
Популярно: Информатика
-
drfast55522.09.2021 06:04
-
Marvarick27.01.2021 02:05
-
samudoma200613.01.2021 22:02
-
kanumah208.06.2022 03:34
-
timofeyfrol05.10.2020 05:54
-
hadika200610.07.2021 04:26
-
petyasmolin17.09.2021 01:16
-
Пусик9509.06.2020 05:23
-
vovsanna09.10.2020 18:35
-
macha201704.09.2021 11:44