Дан массив b перепишите в массив a в обратном порядке ввод с клавиатуры

Дан массив b перепишите в массив a в обратном порядке ввод с клавиатуры

  • Var b:array 1..100 of integer;
    begin
    readln(n); (вводишь количество элементов массива);
    for i:=1 to n do
    read(bi);
    for n downto 1 do
    write(bi, );
    end.
  • Uses crt;
    var a:array1..100 of integer; i,j,k,n:integer;
    begin
    clrscr;
    readln(n);
    for i:=1 to n do
    readln(ai);
    for i:=n downto 1 do
    write(ai, );
    writeln;
    readln
    end.
  • Внимание, только СЕГОДНЯ!
    Ссылка на основную публикацию