Помогите плизЗадан массив Х (50). Переписать в…

Тема в разделе "Информатика", создана пользователем Natamus, 12 янв 2016.

  1. Natamus

    Natamus Школьник

    Регистрация:
    19 ноя 2015
    Сообщения:
    0
    Симпатии:
    0
    Помогите плизЗадан массив Х (50). Переписать в массив У элементы массива Х в обратном порядке
     
  2. Dima21

    Dima21 Школьник

    Регистрация:
    5 мар 2012
    Сообщения:
    0
    Симпатии:
    0
    Var x, y: array [1… 50] of integer; i: integer; begin for i: =1 to 50 do x: =random (50); for i: =1 to 50 do y: =x[51 — i]; for i: =1 to 50 do writeln ('x[', i, '] => ', x); for i: =1 to 50 do writeln ('y[', i, '] => ', y); end. Вот, циклы объединять не стал, т.к. они все-таки разные дела делают
     

Поделиться этой страницей