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

Составе программу ввода С клавиатуры элементов массива а[1..8] и вывода элементов массива в обратном порядке

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

    uses crt;

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

       i:integer;

    begin

        for i:=1 to 8 do

        a[i]:=random(10);

        for i:=1 to 8 do

        begin

             write(a[i]:3);

        end;

        writeln;

        for i:=8 downto 1 do

        write(a[i]:3);

    end.

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

    PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

    Внимание! Если программа не работает, обновите версию!

    begin

     var a := ReadArrReal(8);

     a[::-1].Println

    end.

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