Контрольная работа: Создание электронной записной книжки

Оглавление

1. Описание типов. Процедуры

2. Тело программы

2.1 Создание приветствия

2.2 Редактирование записи

2.3 Вывод текущей записи. Создание команды для вызова справки.

2.4 Вывод определенных полей. Закрытие программы.

2.5 Завершение программы. Принцип работы

Список литературы

Приложение

1. Описание типов. Процедуры

Описание типов начнем с типа «запись»: присвоим ей имя «TSt». Далее опишем компоненты (поля) записи. В данной программе используется 3 поля записи с названиями: Name, Group, Subject и Mark. Они определяют соответствующие поля записной книжки, которые заполняются пользователем. В данной программе необходимо будет использовать и массив, который также определяем в типах.

type TSt=record

Name: string[13];

Group: string[13];

Subject:string[13];

Mark:string[13];

end;

TASt=array[1..10] of TSt;

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

Процедура по вводу данных с именем «WriteSt» будет выглядеть следующим образом:

procedure WriteSt(var A:TSt);

begin

write('group: ');

readln(A.Group);

write('Name: ');

readln(A.Name);

write('Subject: ');

readln(A.Subject);

--> ЧИТАТЬ ПОЛНОСТЬЮ <--