пользователей: 30398
предметов: 12406
вопросов: 234839
Конспект-online
РЕГИСТРАЦИЯ ЭКСКУРСИЯ

Массивы данных. Ввод-вывод массивов (Пример).

    Кроме оператора присваивания значения компонентам массива, можно задать оператором ввода данных. Для простых типов данных в языке Паскаль применяется поэлементный ввод-вывод. При вводе компоненты массива отделяются друг от друга пробелом. По окончании ввода очередной порции данных набирается символ перевода строки.

    В следующем примере приведена программа, осуществляющая ввод-вывод целых вектора К, двумерного массива MAS и символьных массивов s1 и s2. Вектор V содержит всего 3 элемента, поэтому в операторах ввода-вывода просто перечислены его компоненты.

Program VvodM;

Const

pr= ’’;

Type

vector = array [1 ..3] of integer;

stroka = array [1 ..10] of char;

Var

v: vector;

mas: array [1..2] of vector;

s1, s2: stroka;

i, j: integer;

Begin {VvodM}

{ввод массивов}

WriteLn('введите массив v');

ReadLn(v[1], v[2], v[3]);

WriteLn('введите массив mas');

fori := 1 to 2 do

for j := 1 to 3 do

Read(mas[i, j]);

WriteLn('введите s1 и s2');

Readln;

fori := 1 to 10 do

Read(s1[i]);

Readln;

fori := 1 to 10 do

Read(s2[i]);

{вывод массивов}

WriteLn;

WriteLn('массив v');

WriteLn(pr, v[1]:5, v[2]:5, v[3]:5);

WriteLn('массив mas');

fori := 1 to 2 do

begin

WriteLn;

for j := 1 to 3 do

Write(pr, mas[i, j]);

end;

WriteLn;

Write(’s1=');

fori := 1 to 10 do

Write(s1[i]);

Write(’s2=');

fori := 1 to 10 do

Write(s2[i])

End. {VvodM}


20.06.2018; 19:39
хиты: 276
рейтинг:0
Точные науки
информатика
для добавления комментариев необходимо авторизироваться.
  Copyright © 2013-2024. All Rights Reserved. помощь