profile

Опубликовано 5 лет назад по предмету Информатика от garaseva

Дать массив из n элементов, напечатать элементы массива в прямом и обратном порядке, рандом

  1. Ответ
    Ответ дан raf1O5

    program raf105;

    var a:array[1..100] of integer;

    i,n:integer;

    begin

    write('Введите количество элементов в массиве: ');

    readln(n);

    for i:=1 to n do

    begin

     a[i]:= random(1,9);

     write(a[i],' ');

    end;

    writeln;

    for i:=n downto 1 do

     write(a[i],' ');

    end.

    Язык PascalABC

    1. Ответ
      Ответ дан garaseva
      Огромное спасибо!0

Войдите или зарегистрируйтесь, чтобы добавить ответ или свой вопрос на сайт


Другие вопросы