Дан одномерный массив M из 10 элементов, сдвинуть его элементы на три позиции. Pascla

Question

Информатика

София

6 сентября, 22:13

Дан одномерный массив M из 10 элементов, сдвинуть его элементы на три позиции. Pascla

+5

Ответы (1)

Знаешь ответ?

Степаныч · Answer 1

Const N = 10; var a: array [1 ... N] of longint; i, d, j:longint; begin for i:=1 to N do read (a[i]); for j:=1 to 3 do begin d:=a[n]; for i:=N downto 2 do a[i] : = a[i-1]; a[1]:=d; end; writeln ('После сдвига: '); for i:=1 to N do write (a[i],' '); writeln; end.