Пример программы ввода-вывода одномерного массива

program priimer1;

uses crt;

var

mas:array [1..10] of integer; {Описание одномерного массива с именем mas, состоящего из 10 элементов типа integer}

n,i:integer; {n-количество элементов массива, i-счетчик в цикле for}

BEGIN

clrscr;

writeln('Введите количество элементов массива не больше 10: ');

readln(n);

for i:=1 to n do {ввод элементов массива}

begin

writeln('Введите ',i,' элемент массива');

readln(mas[i]);

end; {конец ввода}

writeln('Введенный массив: ');

for i:=1 to n do {вывод элементов массива}

begin

write(' ',mas[i],' ');

end; {конец вывода}

readkey;

END.

Пример программы ввода-вывода двумерного массива

program primer2;

uses crt;

var

i,j,n,m:integer;

massiv:array[1..10,1..10] of integer; {описан двумерный массив с именем massiv}

BEGiN

clrscr;

write('Введите количество строк массива (не больше 10): ');

read(n); {n-количество строк}

write('Введите количество столбцов массива (не больше 10):');

read(m); {m-количество столбцов}

for i:=1 to n do {ввод элементов двумерного массива}

begin

for j:=1 to m do

read(massiv[i,j]);

end; {конец ввода}

writeln('Введенный массив: ');

for i:=1 to n do {вывод элементов двумерного массива}

begin

for j:=1 to m do

write(massiv[i,j]:5);

end; {конец вывода}

readkey;

END.

Порядок выполнения работы

1. Изучить теоретические сведения по теме: “Написание программы на Паскале для решения задач на ввод-вывод линейных и двумерных массивов”.

2. Получить индивидуальное задание у преподавателя и разработать программу в соответствии с поставленной задачей.

3. Показать работающую программу преподавателю.

4. Ответить на контрольные вопросы.

Контрольные вопросы

1. Массивы. Основные понятия и определения.

2. Формат записи массивов. Описание одномерного и двумерного массивов.

3. Действия над массивами. Действия над элементами массивов.

4. Примеры описания и ввода-вывода линейного и двумерного массивов.

Лабораторная работа № 11

Написание программы на Паскале для решения задач на обработку линейного массива

Цель работы: формирование знаний и умений по работе со структурными типами данных. Приобретение навыков написания программ с использованием массивов.