Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Информатика / Конспекты / Ввод и вывод одномерных массивов в Паскале

Ввод и вывод одномерных массивов в Паскале

  • Информатика

Поделитесь материалом с коллегами:

Ввод и вывод одномерных массивов в Паскале



Ввод и вывод массивов осуществляется поэлементно.

Введем одномерный массив Х, состоящий из 30 элементов, то есть необходимо ввести некую последовательность элементов Х1, Х2, …, Х30.

Пусть i – индекс (порядковый номер) элемента в массиве Х. Тогда

Хi – i-й элемент массива Х, где i = 1, 2, …, 30.

Для ввода массива можно использовать любой цикл.



Первый вариант: ввод массива с использованием цикла с предусловием (Рисунок 1).





http://festival.1september.ru/articles/594645/img1.gif

Program Primer_1;

Var i: integer;

     X: array [1..30] of Integer;

Begin

     i := 1;

     While i <= 30 Do

         Begin

            Read (X[i]); i := i + 1

          End;

       Readln

End.



Можно ввести с клавиатуры элементы следующим образом:

-7 _ 4 _ -2 _ 0 _ 12 _ -1 _ -5 _  9 _ 11 _ -3 _ -5 _ … _15, то есть через пробел ввести в строчку и нажать клавишу Enter.



Можно было ввести элементы в столбец,   отделяя элементы клавишей Enter, то есть каждый элемент с новой экранной строки:

-7 Enter

 4 Enter

-2 Enter

  …

 15 Enter





Второй вариант: ввод массива с использованием цикла с постусловием (Рисунок 2).





http://festival.1september.ru/articles/594645/img2.gif

Program Primer_2;

Var i: integer;

     X: array [1..30] of Integer;

Begin

     i := 1;

     Repeat

           Read (X[i]); i := i + 1

     Until i > 30;

       Readln

End.







Третий вариант: ввод массива с использованием цикла с параметром (Рисунок 3).





http://festival.1september.ru/articles/594645/img3.gif

Program Primer_3;

Var i: integer;

     X: array [1..30] of Integer;

Begin

     For i := 1 To 30 Do Read (X[i]);

     Readln

End.





Массив вводится с помощью цикла с параметром, где в качестве параметра используется индекс элемента массива (i).



Вывод одномерного массива осуществляется аналогично.



В программе вместо операторов Read или Readln используются операторы Write или Writeln. Но просто заменить одни операторы на другие здесь недостаточно. Для того чтобы выводимые значения не сливались между собой, надо явным образом вставлять между ними разделитель – пробел или перевод строки. Приведем два возможных способа вывода массива:



  • For i := 1 To n Do Write (X[i],’ ‘);

  • For i := 1 To n Do Writeln (x[i]).



Например, выведем одномерный массив Х1, Х2, …, Хn, состоящий из элементов вещественного типа, используя цикл с параметром (Рисунок 4):





http://festival.1september.ru/articles/594645/img4.gif

Program Primer_4;

Const n = 30;

Var i: Integer;

     X: Array [1..n] Of Real;

Begin

        For i:= 1 To n Do Write (X[i] : 6 : 2,  ‘ ‘);

          Writeln; {курсор переводит на новую строку}

        Readln

End.





Выберите курс повышения квалификации со скидкой 50%:

Автор
Дата добавления 10.03.2016
Раздел Информатика
Подраздел Конспекты
Просмотров126
Номер материала ДВ-514407
Получить свидетельство о публикации

Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.
Специальное предложение
Вверх