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

Оглавление

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

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

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

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

Возможно вы искали - Контрольная работа: Создание электронных плакатов на тему "Деятельность в социально-гуманитарной сфере и профессиональный выбор"

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

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

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

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

Приложение

Похожий материал - Контрольная работа: Создания интерактивных WEB - страниц для получения информации в сети Интернет с использованием форм, заполняемых пользователем

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

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

type TSt=record

Name: string[13];

Group: string[13];

Очень интересно - Реферат: Сокеты, используемые для установки процессоров Intel

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);

Похожий материал - Контрольная работа: Сообщения меню приложения Windows

write('Name: ');

readln(A.Name);

write('Subject: ');

readln(A.Subject);