Из опыта создания универсальных тестовых редакторов — страница 3

структурного программирования. рассмотрим их подробнее. Бейсик- язык программирования ПЭВМ. Бейсик - диалоговый язык высокого уровня, ориентированный на пользователей ПЭВМ, непрофессионалов в области вычислительной техники. Бейсик - преимущественно интерпретирующая программа, позволяющая производить построчную отладку текстов программ. Данный способ гораздо удобнее для начинающих программистов, нежели компилирование

(компилятор производит отладку только целой программы, а не по частям), и широко используется в Паскале. Отличительной чертой структурных языков являются краткие однозначные операторы (в отличие от длиннейших команд объектного программирования)*. В некоторых версиях Бейсика имеется встроенный редактор программ, позволяющий работать с текстом программы из командного окна. Работа с программой осуществляется в трех различных

режимах: ·        Непосредственное общение ·        Ввод программ ·        Вычисление по введенной в ОЗУ программе В основном, Паскаль выполняет те же функции что и Бейсик. Однако Паскаль имеет больший потенциал в областях програмимирования, работы с «компьютерным железом», создания собственных модулей и систем. Структурная программа. Первым этапом разработки программы стало

написание текста структурной программы. Структурная программа- последовательность простых команд, операторов, реализующая ядро, то есть действие программы. Уже на этом этапе программа работает с текстовыми файлами. Для осуществления связей между отдельными частями программы, реализующими функции редактора, я использовал оператор безусловного перехода GoTo. Ниже приведена схема структурной программы тестового редактора,

объясняющая соответствующий подход к программированию. Основной список операторов вырезан и заменен на <набор операторов>. Конечный вид программы будет приведен в главе “Объектное программирование” объектов. Program redactor; uses crt,printer; {подключение модулей} label l1,l2,l3,l4; {метки} Var a,f,f1,a2:string; {раздел описаний} b,k:char; c,u,y,a1,b1:text; d,e,i,j,p,z:integer; c1:boolean; Procedure oform; {процедура оформления начала программы} Begin <набор операторов> End; Begin oform;

{оформление начала программы} <набор операторов> Writeln('Новый файл(New),Открыть файл(Open),Редактирование(Redact),'); {вывод альтернативных функций} Writeln('Просмотр результатов(Search),Выход(Any key)'); b:=readkey; {выбор нужной функции} case b of {оператор варианта} По нажатию соответствующей клавиши происходит выбор функции. 'n','в':Begin l1:<набор операторов> {выполнение функции} End; 'o','й':Begin l2:<набор операторов> {выполнение функции} End; 'r','Є':Begin l3:<набор