СРОЧНО!!! задача в Паскале abc ...дан одномерный массив из 5 чисел, нужно вывести на экран эти элементы, но передвинутые влево на одно место,а т к первый элемент мы не можем подвинуть еще левее,то его нужно разместить на самое последнее место.То есть, к примеру, вводим числа " 1 2 3 4 5 " и в итоге должно получится так " 2 3 4 5 1"
Ответы
Ответ дал:
0
Код в комментарии ниже
Ответ дал:
0
uses crt;
var
a : array [1..5] of integer;
i, c : integer;
begin
for i := 1 to 5 do
begin
write('Введите ', i, '-е число: ');
readln(a[i]);
end;
c := a[1];
for i := 1 to 4 do
a[i] := a[i+1];
a[5] := c;
for i := 1 to 5 do
write(a[i], ' ');
readkey();
end.
var
a : array [1..5] of integer;
i, c : integer;
begin
for i := 1 to 5 do
begin
write('Введите ', i, '-е число: ');
readln(a[i]);
end;
c := a[1];
for i := 1 to 4 do
a[i] := a[i+1];
a[5] := c;
for i := 1 to 5 do
write(a[i], ' ');
readkey();
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
9 лет назад