• ПАСКАЛЬ!
    Дан массив размера N. Вывести его элементы в обратном порядке.

Ответы 2

  • спасибо
    • Автор:

      mookie
    • 5 лет назад
    • 0
  • Можно так:Const N = 10;Var A:array[1..N] of integer;i:integer;BeginFor i:= 1 to N do    Begin    A[i]:=random(21)-10;    Write(A[i],' ');    End;WriteLn;For i:= N downto 1 do    Write(A[i],' ');End.и так:Const N = 10;Var A:array[1..N] of integer;i:integer;BeginFor i:= 1 to N do    Begin    A[i]:=random(21)-10;    Write(A[i],' ');    End;WriteLn;For i:= 1 to N do    Write(A[N-i+1],' ');End.
    • Автор:

      pruitt
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years