profile
Опубликовано 6 лет назад по предмету Информатика от cr9

В одномерном массиве 2-й элемент поставить на первое место, 3-й - на 2-оеи т.д. 

1-й элемент поставить на последнее место.

  1. Ответ
    Ответ дан Аккаунт удален

    var mas:array[1..5] of integer; i,j,a,b,f,r:integer;
    begin
    for i:=1 to 5 do
    readln(mas[i]);
    writeln(mas[i]);
    a:=mas[1];
    j:=mas[2];
    b:=mas[3];
    f:=mas[4];
    r:=mas[5];
    mas[1]:=j;
    mas[2]:=b;
    mas[3]:=f;
    mas[4]:=r;
    mas[5]:=a;
    for i:=1 to 5 do
    writeln(mas[i]);
    readln;
    end.

Самые новые вопросы