Программирование на языках высокого уровня

МОСКОВСКИЙ ИНСТИТУТ РАДИОТЕХНИКИ,

ЭЛЕКТРОНИКИ И АВТОМАТИКИ

(ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ)

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

Программирование на языках В/У

Студент:

Группа:

Москва 2003

СОДЕРЖАНИЕ

1 ЗАДАНИЕ  3

2 БЛОК-СХЕМА ПРОГРАММЫ 3

3 ТЕКСТ ПРОГРАММЫ 7

4 ОПИСАНИЕ РАБОТЫ ПРОГРАММЫ  9

5 РУКОВОДСТВО ОПЕРАТОРА  18

1 ЗАДАНИЕ

Напечатать в алфавитном порядке все различные идентификаторы программы на языке Pascal, указав для каждого число его вхождений в тексте программы.

Программа находится в текстовом файле. Максимальная длина идентификатора заранее неизвестна.

 

2 БЛОК-СХЕМА ПРОГРАММЫ

 

Read(f,ch);

Нет

 

Да

 

Read(f,ch);

Нет Да

 

Нет

 

Да

Нет Да

 

 

Нет

 

Да

 

Нет

 

 

Да

			c:=false; e:=false;

 

 

Да

Нет

 

 

c:=true; e:=false; ST:=''

Да

 

 

Нет

Да

 

Нет

 

Да

 

Нет

 

 

 

ST:='';

Да  

Нет

 

Да

 

 

Нет

 

Нет Да Да

 

 

Нет

	L:=L^.p;

 

Нет

 

Да

		st:=st+ch;
							New(FEst); FEst^.s:=L^.s; FEst^.k:=L^.k; FEst^.p:=nil;

 

Да

 

 

Нет

			L:=L^.p; Est:=FEst;

 

Нет

 

 

Да

				PEst:=Est; Est:=Est^.p;

 

 

Да

					L^.k:=L^.k+1; st:=''; b:=true; L:=L^.p;

 

 

Нет

New(temp); temp^.s:=L^.s; temp^.k:=L^.k; temp^.p:=nil; PEst^.p:=temp;

 

Да

 

 

Нет

 

New(temp); temp^.s:=L^.s; temp^.k:=L^.k; temp^.p:=Est; PEst^.p:=temp;

Да

 

Нет

 

Да

 

Нет

 

Да

Нет