Ответы на вопрос:
Program crazycoder; var i,n: byte; k: integer; a: array [1..10] of integer; begin randomize; writeln('исходный массив'); for i: =1 to 10 do begin a[i]: =random(21)-10; write(a[i],' '); end; writeln; write('введите кол-во смещений: '); read(n); repeat k: =a[2]; for i: =2 to 9 do a[i]: =a[i+1]; a[10]: =k; n: =n-1; until n=0; writeln('результат: '); for i: =1 to 10 do write(a[i],' '); writeln; end .
Популярно: Информатика
-
litovka10.05.2023 13:36
-
maksim15m1524.01.2023 21:21
-
Pashitsyna18.05.2022 08:31
-
Wely14.08.2021 00:17
-
DenneD43208.06.2023 09:28
-
nintendo16128.05.2021 18:02
-
гогогогог06.01.2020 02:01
-
Знайка5000000001.05.2022 14:40
-
aizhan7904.03.2021 20:08
-
Lisa03010516.08.2022 17:16