Основы технологии программирования

Методическое пособие - Компьютеры, программирование

Другие методички по предмету Компьютеры, программирование

if punkt<n then begin

gotoxy(x,y+punkt-1);

write(menu[punkt]);

punkt:=punkt+1;

textattr:=sel;

gotoxy(x,y+punkt-1);

write(menu[punkt]);

textattr:= norm;

end;

chr(72) : { стрелка вверх }

if punkt<n then begin

gotoxy(x,y+punkt-1);

write(menu[punkt]);

punkt:=punkt-1;

textattr:=sel;

gotoxy(x,y+punkt-1);

write(menu[punkt]);

textattr:= norm;

end;

end; {case … of }

end

else

if ch=chr(13) then { нажата клавиша }

begin

case punkt of

  1. : punkt1;
  2. : punkt2;
  3. : ch:=chr(27) ; {выход}

end;

Menutoscr;

End;

until ch= chr(27) ; {27 - код }

End.

ПРИЛОЖЕНИЕ 1

 

Волжский университет имени В.Н. Татищева

Кафедра “Информатика и системы управления”

 

 

 

 

 

 

 

 

 

КУРСОВАЯ РАБОТА

 

по дисциплине : “Основы технологии программирования”

Тема: “Регистрация участников конференции”

 

 

 

Выполнил: студент гр. ЭК-105

Иванов И.И.

Преподаватель: Матвеева Н.В.

 

 

 

Тольятти 1999

ПРИЛОЖЕНИЕ 3

 

Волжский университет имени В.Н. Татищева

Кафедра “Информатика и системы управления”

Специальность: 071900 “Информационные системы”

 

 

ЗАДАНИЕ

на курсовой проект по дисциплине

“Основы технологии программирования”

 

 

 

Студенту__________________________________________________________

Группа___________________________________________________________

Тема проекта__________________________________________________________

Календарный график задания________________________________________

 

СОДЕРЖАНИЕ ЗАДАНИЯ

 

__________________________________________________________________

 

Руководитель курсовой работы

 

Студент