Написание программы "телеграф" на Turbo Pascal

Не рекомендуется работать с системой, назначив в качестве каталога по умолчанию (текущего каталога) тот, в котором хранятся перечисленные выше файлы

Написание программы "телеграф" на Turbo Pascal

Курсовой проект

Компьютеры, программирование

Другие курсовые по предмету

Компьютеры, программирование

Сдать работу со 100% гаранией

.: Delay (50);

_: Delay (100);

end;

Nosound;

Delay (50);

end;

j:=j+1;

until ((sim[j]= ) or (j>4));

Delay (100); {пауза между буквами}

end

else

if mes [i]= then {пробел между символами}

begin

write ( ); {пробел между словами сообщения}

Delay (150);

end;

end;

writeln

writeln ( Сообщение передано! );

writeln ( Для завершения работы с программой нажмите , <Enter>);

readln;

end.

Инструкция программиста

 

В данной программе были использованы различные функции, операторы, процедуры. Такие как:

Составной оператор Begin и End

Составной оператор представляет собой последовательность некоторых операторов, выполняющихся в том порядке, в каком они представлены в тексте программы.

Program<Имя программы>;
<Раздел описаний>
Begin
<Тело программы>
End.

Зарезервированные слова Begin и End являются так называемыми операторными скобками, в которые заключены операторы, входящие в составной оператор. Когда в зависимости от определённого условия, требуется обеспечить последовательное выполнение некоторого набора операторов, без составного оператора не обойтись.

Условный оператор If и Case

Если в программе, в зависимости от некоторого условия, требуется выбрать тот или иной вариант действий, можно воспользоваться одним из условных операторов. В Turbo Pascal предусмотрены два условных оператора- If и Case.

Работа Case такова. Сначала вычисляется значение селектора, следующего за словом Case. Затем выполняется оператор с константой выбора, равной значению селектора. Если ни одна из констант не равна текущему значению селектора, то исполняется оператор, стоящий после слова Еlse. Часть Еlse <оператор> в тексте программы можно опустить. Тогда, если среди констант селектора нужное значение отсутствует, выполнение оператора Case ни к чему не приведет.

Case <выбор селектора> of

<метка 1>: <оператор 1>;

.

.

.

<метка n>:<оператор n>;

else <оператор>;

end;

Если необходимо выбрать одно из возможных действий в зависимости от некоторого условия, применяют условный оператор if.. then..else. Во многих программах, в зависимости от некоторого условия, часто требуется выполнить не одно, а последовательность действий. Однако оператор If в Turbo Pascal обеспечивает выполнение единственного оператора, присутствующего после зарезервированного слова Then или Else.

If <условие> then <оператор 1> else <оператор 2>;

Процедуры записи Write, Writeln.

Использование процедуры Write для типизированных файлов заключаются в присвоении значения некоторой переменной компоненту файла. После записи каждой переменной, указатель текущей позиции файла перемещается к следующему элементу. Если указатель находится в конце файла, то при записи очередного элемента дополняет файл.

Процедура Write отличается от Writeln тем, что после выполнения действий, присущих процедуре Write, осуществляется запись в файл маркера конца строки. При этом файл, к которому применяется процедура Writeln, должен быть открыт для записи. Если процедура Writeln не содержит никаких аргументов, то она осуществляет просто перевод строки.

Процедура чтения Read, Readln.

В Паскале для ввода данных предусмотрена процедура чтения Read. Использование данной процедуры для текстовых файлов заключается в считывании одного или нескольких значений файла и присвоении считанного значения переменной, указанной при вызове процедуры.

Read отличается от процедуры Readln только тем, что после выполнения действий, присущих процедуре Read, осуществляется переход к следующей строке файла.

В случае, когда в программе имеется несколько операторов Read, данные для них будут набираться в одной строке. Переход на следующую строку произойдет, когда окончится текущая строка. Однако в Паскале предусмотрено считывание данных из отдельной строки с помощью процедуры Readln. После считывания последнего значения из списка этой процедуры следующие данные будут считываться с начала новой строки.

Оператор Repeat until.

Оператор цикла, Repeat, известный как оператор цикла с постусловием, имеет вид:

Repeat

<оператор #1>;
<оператор #2>;
<оператор #3>;
. . .

Until <условие>;

Здесь не требуется использование составного оператора, потому, что сами слова Repeat и Until являются операторными скобками.

Этот вид цикла отличается от других в основном тем, что проверка условия повторения тела цикла находится не перед ним, а после. Поэтому цикл "До" называют циклом "с постусловием", а "Пока" - "с предусловием".

Повторное выполнение тела цикла происходит не тогда, когда условие справедливо, а как раз тогда, когда оно ложно. Поэтому цикл и получил свое название (выполнять тело цикла до выполнения соответствующего условия).

Когда условие цикла изначально истинно, тело цикла все равно будет выполнено хотя бы один раз. Именно это отличие "до" от "пока" привело к тому, что в программировании они не подменяют друг друга, а используются для решения задач, к которым они более подходят.

Оператор For to do.

В данном случае параметром будет являться целочисленная переменная, которая будет изменяться на единицу при каждой итерации цикла. Таким образом, задав начальное и конечное значения для такой переменной, можно точно установить количество выполнений тела цикла.

Форматов у этого вида цикла предусмотрено два:
For <И.П.>:=<Н.З.> To <К.З.> Do <оператор>;
For <И.П.>:=<Н.З.> Downto <К.З.> Do <оператор>;

Здесь И.П. - имя переменной-параметра, Н.З. - его начальное значение, К.З. - соответственно конечное значение параметра. В качестве начального и конечного значений.

Выполняется этот цикл по следующему алгоритму:

1. переменной-параметру присваивается начальное значение;

2. выполняется тело цикла;

3. переменная-параметр автоматически увеличивается на 1 (в первом случае формата);

4. если параметр превышает конечное значение, то происходит выход из цикла, иначе - переход к пункту 2.

 

Инструкция пользователя

 

Работа в среде программирования Turbo Pascal начинается с загрузки её в память компьютера. Система Турбо Паскаль довольно значительна по объему. Она поставляется на нескольких дистрибутивных дискетах и устанавливается на жесткий диск. При развертывании системы на жестком диске обычно создается отдельный каталог с именем ТР (или PAS, TURBOPAS, PASCAL и т.п.), в который помещаются все файлы с дистрибутивных дискет. Для вызова Турбо Паскаля необходимо отыскать в древовидной структуре каталогов ПК этот каталог и в нем файл с именем TURBO.EXE. Этот файл содержит готовую к работе диалоговую систему программирования Турбо Паскаль. В него входят минимально необходимые части Турбо Паскаля (текстовый редактор, компилятор, компоновщик, загрузчик). Для нормальной работы в диалоговой среде понадобятся также основная библиотека, располагающаяся в файле TURBO.TPL, и справочная служба (файл TURBO.HLP). В принципе, этих файлов достаточно для написания, компиляции и исполнения большинства примеров.

Пусть перечисленные файлы располагаются в каталоге ТР на диске D. Тогда для вызова Турбо Паскаля следует дать команду

D:\TP\TURBO

Для запуска Turbo Pascal необходимо перейти на диск в каталог с системой Turbo Pascal и дважды щёлкнуть по файлу Turbo.exe. После загрузки на экране появится окно редактирования Turbo Pascal.

 

 

В верхней части окна редактирования Turbo Pascal размещается меню, состоящее из опций: File (управление файлами), Edit (редактирование текста программы), Search (поиск и замена текста), Run (выполнение программы в различных режимах), Compile (компиляция, создание exe-файла), Debug (отладка программы), Tools (отладочные команды сообщения), Options (настройка среды программирования), Window (управление окнами), Help (доступ к встроенной справочной системе). Команды меню можно выбирать с помощью клавиатуры (F10 и клавиши управления курсором) либо мышью (щелчок по нужной опции меню).

Центральную часть окна занимает рабочая область, предназначенная для работы с текстом программ. В нижней части окна расположена строка статуса, в которую вводится информация о выполняемой в данный момент операции. В строке статуса отображаются также функциональные клавиши и комбинации клавиш, допустимые в данный момент в активном окне (F1-Help, F2-Save и т.д. ). Над строкой статуса в разрыве рамки окна указываются координаты курсора: номера редактируемой строки и позиции в строке, например, 6:11. Помимо этого имеются ещё вертикальные и горизонтальные полосы прокрутки, кнопка закрытия окна и др.

Не рекомендуется работать с системой, назначив в качестве каталога по умолчанию (текущего каталога) тот, в котором хранятся перечисленные выше файлы (этот каталог бу

Похожие работы

<< < 1 2 3 4 >