Сдвинуть все элементы массива на одну позицию вправо (циклически). Последний элемент должен оказаться на месте первого.В ПАСКАЛЕ
Сдвинуть все элементы массива на одну позицию вправо (циклически). Последний элемент должен оказаться на месте первого.В ПАСКАЛЕ
Гость
Ответ(ы) на вопрос:
Гостьvar i:integer;
x:array[1..5]of integer;
begin
for i:=1 to 5 do
begin
if i<>5 then read(x[i+1])
else read(x[1]);
end;
end.
Самое простое решение-считывать сразу в сдвинутом состоянии.
Не нашли ответ?
Похожие вопросы