Ответы на вопрос:
Var a,b: array[1..7]of integer; i: integer; begin for i: =1 to 7 do a[i]: =random(15)+1; b[1]: =a[7]; for i: =2 to 7 do b[i]: =a[i-1]; for i: =1 to 7 do writeln(a[i]: 4,b[i]: 4); end.
Популярно: Информатика
-
Mlpoiuytrewqazxcvbn15.06.2020 03:26
-
masha2812281215.09.2022 03:10
-
tiffany001318.01.2021 20:40
-
vadimgricuk7405.08.2020 07:00
-
Mucuo3102.09.2022 16:16
-
prokopchukalex20.12.2021 00:46
-
katya256222.06.2021 11:36
-
alinasad33717.06.2023 13:59
-
25Виктория0306.11.2021 04:06
-
LidaDay18.05.2022 05:59