Введение

1. ОРГАНИЗАЦИЯ ВВОДА-ВЫВОДА

1.1 Процедуры ввода

1.2 Процедуры вывода

1.3 Бесформатный вывод

1.4 Форматный вывод

1.5 Описание одномерных массивов

1.6 Ввод – вывод одномерных массивов

1.7 Описание двумерных массивов

1.8 Ввод – вывод двумерных массивов

2. ОБРАБОТКА МАССИВОВ. СТРУКТУРИРОВАННЫЕ ДАННЫЕ

2.1 Строки. Описание строки

2.2 Операции над строками

2.3 Процедуры и функции обработки строк

2.4 Комбинированный тип данных - записи. Описание записей

2.4.1 Записи с фиксированной частью

2.4.2 Записи, использующие вариантную часть

Заключение

Литература

Введение

Тема реферата «Организация ввода-вывода. Обработка массивов. Структурированные данные» по дисциплине «Вычислительная техника и основы программирования».

Цель работы – ознакомится с основными понятиями и организацией ввода-вывода, обработкой массивов.

1. ОРГАНИЗАЦИЯ ВВОДА - ВЫВОДА

1.1 Процедуры ввода

Read <список ввода>;

или

Readln <список ввода>;

Различие в выполнении процедур заключается в том, что процедура Readln включает переход на новую строку по окончании ввода. Использование Readln без параметров обеспечивает переход к новой строке.

Список ввода - представляет собой перечисленные через запятую имена переменных, которые в результате ввода получают определенные значения.

Пример:

С процедурой ввода связана стандартная функция Eoln, значение которой имеет тип boolean:

Пример:

Var K,I: integer;

...

Readln; I:=0;

while not Eoln do

{осуществляется ввод целых значений K и подсчитывается

количество чисел до достижения конца строки}

begin

Read(K);

I:=I+1

end;

1.2 Процедуры вывода

Write (<список вывода>);

или

Writeln (<список вывода>);

Различие в выполнении процедур заключается в том, что процедура Writeln по окончании вывода обеспечивает переход на новую строку. Использование Writeln без параметров обеспечивает переход на новую строку.

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

Допускается бесформатный и форматный вывод.

1.3 Бесформатный вывод

При использовании бесформатного вывода данные выводятся на устройства вывода в форматах, обусловленных в среде Turbo-Pascal 7.0 системой умолчаний и типом данных.

Пример:

var A,B: real;

I,N: integer;

C: char;

...

I:=0; N:=I+1;

A:=0.25; B:=Sqrt(A); C:=’#’;

Writeln(I,’ ‘,N); { 0 1}

Writeln(A,B); { 2.5000000000E-01 5.0000000000E-01}

Writeln(A,Sqrt(A)); { 2.5000000000E-01 5.0000000000E-01}

Writeln(N+5,C); { 6#}

Write(MaxInt);{32767-максимальное число типа integer}

1.4 Форматный вывод

одномерный массив строка ввод

При использовании форматного вывода каждый элемент списка может быть представлен в одной из следующих форм:

A:w

A:w:d

где A - элемент списка вывода;

w - целое положительное число, определяющее общую длину поля вывода;

d - целое положительное число, определяющее длину дробной части выводимого вещественного числа.

Пример:

var A,B: real;

I,N: integer;

C: char;

...

I:=0; N:=I+1;

A:=0.25; B:=Sqrt(A); C:=’#’;

Writeln(A:5:2,B:6:2); { 0.25 0.50}

Writeln(‘I=’,I:4); {I= 0}

Writeln(C:4); { #}

Writeln(‘B=’,Sqrt(A):6:2); {B= 0.50}

Writeln(‘***************’); {***************}

Writeln(‘*A=’,A:4:2,’*B=’,B:4:2,’*’);{*A=0.25*B=0.50*}

Writeln(‘***************’); {***************}

1.5 Описание одномерных массивов

Массив - совокупность конечного числа данных одного типа, объединенных общим именем.

0.1, 0.5, 0.7, ..., 1.9 12, 34, 56, ..., 13

A[I], B[J] - элементы массива,

где I, J - индексы, указывающие номер или место данного элемента в массиве.

1.6 Ввод-вывод одномерных массивов

Var <имя массива>: array[<диапазон изменения индекса>] of <тип элементов>;

Размерность массива может быть любой, элементы массива могут быть любого, в том числе и структурированного типа, индекс может быть любого ординального типа, кроме типа Longint.

Пример:

Var A: array [1..4] of real;Type MAS1=array[1..4] of real;

B: array [1..3] of integer;MAS2=array[1..3] of integer;

Var A: MAS1;

B: MAS2;

или

Type I1=1..4;

I2=1..3;

MAS1=array[I1] of real;

MAS2=array[I2] of integer;

Var A: MAS1;

B: MAS2;

Пример:

for I:=1 to 4 do for I:=1 to 4 do

Read(A[I]);илиbegin

Writeln(‘A[‘,I,’]=’);

Read(A[I])

end;

{Ввод элементов одномерного массива}

Пример:

{Вывод элементов одномерного массива}

for J:=1 to 3 dofor J:=1 to 3 do

Write(B[J]:3);Writeln(‘B[‘,J,’]=’,B[J]:3);

{в строку 12 34 56}{в столбец B[1]= 12

B[ 2]= 34

B[ 3]= 56}

1.7 Описание двумерных массив

D[I,J] - элемент матрицы,

где I- номер строки,

J- номер столбца.

1.8 Ввод-вывод двумерных массивов

Var <имя массива>: array[<диапазон строк>,<диапазон столбцов>]

of <тип элементов>;

Пример:

Var D:array[1..2,1..3] of integer;или Type MATR=array[1..2,1..3] of integer;

Var D: MATR;

Type ST=array[1..2] of integer;

MATR=array[1..3] of ST;

Var D: MATR;

Пример:

for I:=1 to 2 do

for J:=1 to 3 do

Read(D[I,J]); {Последовательность ввода: 1 3 2 4 6 7}

{Ввод элементов двумерного массива}

Пример:

{Вывод элементов двумерного массива}

for I:=1 to 2 do

for J:=1 to 3 do

Write(D[I,J]); {вывод в строку 1 3 2 4 6 7}

или

for I:=1 to 2 do

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

for J:=1 to 3 do

Write(D[I,J]) {вывод элементов строки}

end;{результат вывода: 1 3 2

4 6 7}

В среде Turbo- элементы матрицы располагаются в оперативной памяти построчно. Для обращения к элементам матрицы удобно использовать приведенный индекс, IPR- это порядковый номер элемента массива в памяти.

Например: Var D: array [1..M,1..N] of integer;

тогда для D[I,J]IPR=(I-1)*N+J

Начальные значения элементам массивов в среде Turbo-Pascal могут быть заданы с использованием типизированных констант.

Пример:

Type MAS2=array [1..3] of integer;

MATR=array[1..2,1..3] of integer;

Const B:MAS2=(12,34,56);{одномерный массив: 12 34 56}

D:MATR=((1,3,2),(4,6,7));{двумерный массив: 1 3 2 46 7}

2. СТРУКТУРИРОВАННЫЕ ТИПЫ ДАННЫХ

2.1 Строки. Описание строки

Для обработки группы символов в среде Turbo-Pascal используется структурированный тип String.

Определение типа

Var S:string[n];

где n - длина строки (целое число без знака из интервала 1..255).

Текущая длина строки может изменяться в процессе выполнения программы, но не должна превышать указанной в описании. Если длина строки не указана в описании, то по умолчанию она принимается равной 255 символов.

Пример:

Var S:string;Var C:char;

I:byte; S:string[5];

......

S:=’PASCAL’;S:=’HELLO’;

Write(S[2]); {A}C:=S[1]; {C:=’H’}

for I:=4 downto 1 do S[2]:=’*’;

Write(S[I]); {CSAP} Writeln(S); {H*LLO}

S:=’’;{пустая строка}