Переставить последний элемент массива на место первого . При этом первый, второй,.., последний элементы сдвинуть вправо на 1 позицию
Переставить последний элемент массива на место первого . При этом первый, второй,.., последний элементы сдвинуть вправо на 1 позицию
Гость
Ответ(ы) на вопрос:
ГостьProgram mac;
uses crt;
const n=9;
var c,i:integer; a:array[0..n] of integer;
begin
writeln('введите исходный массив');
for i:=0 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
writeln('вывод исходного массива');
for i:=0 to n do
write(a[i],' ');
writeln;
c:=a[n];
for i:=n-1 downto 0 do
a[i+1]:=a[i];
a[0]:=c;
writeln('вывод результативного массива');
for i:=0 to n do write(a[i],' ');
readln
end.
Не нашли ответ?
Похожие вопросы