end;

if i=3 then

begin

menin (11,4,29,5,7);

punkt (11,10,29,11,4,' Udalit');

end;

if i=4 then

begin

menin (11,4,29,5,7);

punkt (11,13,29,14,4,' Vixod');

end;

until key=#13;

case i of

1: vv;

2:red;

3:udal;

end;

until i=4;

end.

Висновок

В даній курсовій роботі буда розроблена програма «Водій», де зберігаються всі відомості про власників автомобілів і при необхідності їх можливо легко проглянути та використати для необхідних мір при розкритті злочинів чи ДТП.

Було створене головне поле, де графічно створені пункти вибору певного дійства яке вибрав користувач. Під слофом графіка тут розуміється псевдографіка яка доступна завдяки модулю CRT. Також в «Водій» використовуються процедури з модулю DOS. Була використані приємна кольорова гама, яка надає розслабленості користувачу, а також концентрує увагу на певних важливих елементах програми.

Список використаної літератури

1.Струков В.М. Основи алгоритмизации и програмирования. Часть 2. Учебное пособие. – Харьков: Изд. Нац. ун-та внутр. дел, 2003. – 188 с.

2.Сердюченко В.Я. Розробка алгоритмів та програмування на мові TurboPascal. – X., 1995.

3.Немнюгин С.А. TurboPascal. – СПб.: Питер, 2002. – 496 с.: ил.