Подпрограмма–процедура
Процедура в отличие от функции может вычислять и передавать в основную программу несколько параметров.
Пример 1:
В программе задаются два целых числа 5 и 7, эти числа передаются процедуре INC2, в которой они удваиваются. Один из параметров передается как параметр–переменная, другой – как параметр–значение. Значения параметров до и после вызова процедуры, а также результат их удвоения выводятся на экран.
Решение.
Const
A : Integer = 5 ;
B : Integer = 7 ;
{------------}
Procedure Inc2 (var c : Integer; b : Integer);
Begin {Inc2}
C := c+c;
B := b+b;
Writeln (‘Удвоенные :’, c:5, b:5)
End {Inc2};
{-------------}
Begin {main}
Writeln (,Исходные :’, a:5, b:5);
Inc2(a, b);
Writeln (‘Результат :’, a:5, b:5);
End {main}.
В результате прогона программы будет выведено:
Исходные : 5 7
Удвоенные : 10 14
Результат : 10 7
Как видно из примера, удвоение второго формального параметра в процедуре не вызвало изменения фактической переменной В, так как этот параметр описан в заголовке процедуры как параметр-значение.
Пример 2.
В целочисленной матрице размером 10x10 произвести сортировку чисел в строках по возрастанию значений. Первоначально заполнить матрицу целыми случайными числами в диапазоне от 0 до 100.
Решение.
Для решения задачи составим процедуру SortVec сортировки одномерного массива по возрастанию значений. Используем для этого «алгоритм пузырька». В основной программе используем эту процедуру для сортировки каждой строки матрицы.
Program SortMatr;
Const N=10;
Type Vector=array[1..N] of integer;
Var A: array[1..N] of Vector;
K, l: integer;
Procedure SortVec(Var X: Vector);
Var I, j, z : integer;
Begin
For i:=1 to N-1 do
For j:=1 to N-I do
If X[j] < X[j+1] then
Begin z := X[j]; X[j] := X[j+1]; X[j+1] := z
End;
End;
Begin {Заполнение матрицы случайными числами}
For k:=1 to N do
for l := 1 to N do
A[k, l] := random(100);
For k := 1 to N do SortVec (A[k]); {сортировка строк}
For k := 1 to N do {вывод отсортированной матрицы}
Begin writeln;
For l := 1 to N do write (A[k, l]: 5)
End
End.
При задании массива в качестве формального параметра в заголовке программы типы формальных параметров должны обязательно быть стандартными или производными ранее объявленными типами. Например, следующий заголовок является недопустимым:
Procedure J ( var A:array[1..10] of byte);
В данном случае тип параметра А определяется программистом и поэтому следует воспользоваться идентификатором:
Type
MyArray=array [1..10] of byte;
…………….
Procedure Correct (var A: MyArray);
Создание и отладка компьютерных программ Общие сведения.
Создание текста программы на языке программирования выполняется человеком вручную, а перевод текста программы в машинные двоичные коды выполняется специальными компьютерными программами. Для перевода программ с языков высокого уровня на язык машинных команд используются специальные программы, называемые трансляторами, а сам процесс перевода называется трансляцией. Трансляторы подразделяются на две большие группы – интерпретаторы и компиляторы. Компиляторы сначала переводят всю программу в машинные коды и после этого очень быстро исполняют её. Достоинством компиляции является быстрота исполнения, а недостатком – невозможность увидеть промежуточные результаты. Результат выполнения программы мы увидим только после успешной компиляции, а на этапе предварительной подготовки программа-компилятор обычно требует устранить все синтаксические ошибки. Интерпретаторы покомандно переводят программу на язык машинных кодов и тут же исполняют команду. Программа- интерпретатор при обнаружении ошибки прекращает работу и предлагает исправить ошибку. Достоинство интерпретаторов – возможность видеть промежуточные результаты и вносить в исполняемый алгоритм изменения. Недостаток – гораздо более медленная работа по сравнению с компиляторами
Система программирования Турбо Паскаль
Система программирования Турбо Паскаль (Turbo Pascal) представляет собой сочетание компилятора с языка программирования Паскаль и программной оболочки, помогающей в создании программ. В названии языка Турбо – это торговая марка разработчика системы Турбо Паскаль фирмы Borland International, Inc (США), а Паскаль – название широко распространённого языка программирования (язык назван в честь выдающегося французского математика и философа Блеза Паскаля). Программной оболочкой предоставляется диалоговая среда, которая способствует повышению эффективности создания программ. Эту диалоговую среду называют также средой разработчика Турбо Паскаля.
Система программирования Турбо Паскаль является одной из наиболее популярных систем программирования. Это объясняется сочетанием двух безусловных её достоинств: исключительной простотой и естественностью языка программирования Паскаль и великолепными сервисными возможностями диалоговой среды программирования фирмы Borland. С помощью Турбо Паскаля можно создавать любые программы – от программ, предназначенных для решения простейших вычислительных задач, до сложных современных систем управления базами данных и операционных систем.
Диалоговая среда разработчика Турбо Паскаль
Вход в диалоговую среду осуществляется с помощью ярлыка Турбо Паскаль рабочего стола Windows. После вызова системы на экране компьютера откроется диалоговое окно среды разработчика Турбо Паскаля. Для управления средой разработчика Турбо Паскаля используются меню и функциональные клавиши. Верхняя строка открывшегося окна содержит меню возможных режимов работы, а нижняя – краткую справку о назначении основных функциональных клавиш. Вся остальная часть экрана является окном редактора и предназначена для ввода и корректировки текста программ. В его верхней строке приводится имя того дискового файла, откуда был прочитан текст программы, или имя NONAME00.PAS, если текст не читался с диска.
В Турбо Паскале можно работать одновременно с несколькими программами (или частями одной программы), каждая из которых может располагаться в отдельном окне редактора. Номер окна указывается справа в строке имени файла. Кроме окна редактора, используются также окна: отладочного режима, вывода результатов работы программы, справочной службы, стека, регистров. По желанию они могут вызываться на экран поочерёдно или присутствовать на нём одновременно.
С каждым пунктом меню или функциональной клавишей связывается некоторая команда, управляющая средой. Функциональные клавиши обозначаются F1,F2, …, F12 и располагаются в самом верхнем ряду клавиатуры. Действие функциональных клавиш можно модифицировать одновременным нажатием особых клавиш: ALT, CTRL, SHIFT и т.д. Наиболее часто используемые функциональные клавиши и их сочетание называют «горячими клавишами». Ниже приведены основные команды среды разработчика Турбо Паскаль и соответствующие им горячие клавиши (знак «+» между клавишами означает одновременное нажатие клавиш).
F10 – вход в меню
Ctrl+F9 – запуск программы
Alt+F5 – просмотр пользовательского экрана
F2 – сохранение программы
F3 – открытие сохраненной программы
Alt+F3 – закрытие активного окна
Alt+X – выход из Турбо Паскаль
F1 – контекстная помощь
Ctrl+F1 – справка об операторе, на котором установлен курсор
Alt+Backspace – отмена последнего изменения
Ctrl+Y – удаление строки
Shift+стрелки – выделение блока текста
Ctrl+Insert – копирование выделенного блока в буфер
Shift+Insert – вставка из буфера
Основные этапы создания компьютерной программы. Работа в текстовом редакторе среды программирования ТР.
Текст программы на языке ТР необходимо набрать в текстовом редакторе ТР.
При работе в строенном редакторе ТР можно:
-удалить ненужную строку <Ctrl>+<Y>;
-восстановить случайно удалённую строку или фрагмент текста – EditUndo. Эта же команда отменяет последнее изменение;
-удаление фрагмента текста EditCut;
-копирование фрагмента текста EditCopy, а затем EditPaste.
Сохранение текста программы на диске.
- с новым именем FileSave as…
- дозапись FileSave (или нажать клавишу <F2>)
Поиск ошибок в тексте программы.
После подготовки текста программы можно попытаться исполнить её, т.е. откомпилировать её, связать её (если необходимо) с библиотекой стандартных процедур и функций (компоновка), загрузить в оперативную память и передать ей управление. Эта последовательность действий называется прогоном программы и реализуется командой RunRun (или одновременно нажать клавиши <Ctrl>+<F9>).
При обнаружении ошибки строка программы, в которой допущена ошибка, будет помечена курсором, а в статусной строке (верхняя часть экрана на красном фоне) будет выведено диагностическое сообщение об ошибке. Чтобы посмотреть подсказку, нажмите клавишу <F1>.
Таким образом, легко устраняются синтаксические ошибки. Если же ошибка возникла на этапе работы программы, то простого указания места возникновения ошибки может оказаться недостаточно. При обнаружении ошибок логики и других ошибок в протоколе работы программы в окне вывода появляется сообщение об ошибке следующего формата:
Runtime error (errnum) at :, где
Runtime error – «ошибка запуска»;
Errnum – содержит код ошибки;
: – содержит адрес ошибки.
Для входа в окно вывода выполнить команду
DebugUser Screen (или одновременно нажать клавиши <Alt>+>).
Для поиска конкретного места ошибки можно выполнить команду SearchFind Error и ввести адрес ошибки из диагностического сообщения в окно ввода адреса.
После исправления ошибки необходимо сохранить исправленный вариант программы (см. п. 5). Затем повторно запустить на исполнение.
Если не удалось устранить ошибку, то в таких случаях обычно прибегают к более детальному анализу. Для этого можно воспользоваться следующими возможностями для отладки программы:
а) Трассировка. – пошаговое исполнение программы.
Она выполняется тремя способами:
- RunTrace Into (или нажатие <F7>) – пошаговое исполнение с трассировкой процедур и функций по мере их вызова.
- RunStep over (или нажатие <F8>) –пошаговое исполнение программы, обходя вызовы процедур и функций.
- RunGo to cursor (или нажатие <F4>) – выполнение программы до строки, в которой находится курсор. Далее можно продолжить отладку одним из предыдущих способов.
После выполнения команды первый исполняемый оператор будет подсвечен контрастным цветом. Для его исполнения повторно выполнить команду. При этом система перейдёт в окно исполнения и вернётся в окно редактирования. Если же на экране останется окно исполнения, то это команда ввода и надо ввести исходные данные и нажать клавишу <Enter>. Далее выполнять команду трассировки до конца программы.
Для выхода из режима одновременно нажать<Ctrl>+<F2>.
б) Использование окна отладчика Watch – позволяет просматривать в ходе выполнения программы текущие значения переменных и выражений.
Для вызова окна выполнить команду
DebugAdd watch… (или нажмите <Ctrl>+<F7>).
В появившемся окне указать имя программы. Затем повторить команду и вписать имя переменной или выражение, значение которого вы хотели бы наблюдать при отладке программ.
Доступ к окну отладчика возможен с помощью клавиши <F6>. Если сделать окно активным <F5>, то можно перемещаться в нём, «прокручивая» его содержимое.
Можно также в «подозрительном» месте программы просто «встать» на имени переменной и выполнить <Ctrl>+<F4>). В открывшемся окне в верхнем поле будет стоять имя переменной. Нажмите <Enter> и в среднем поле появится текущее значение переменной. Можно ввести с помощью клавиатуры выражение, значение которого Вас интересует.
Просмотр результатов выполнения программы:
DebugUser Screen (или одновременно нажать клавиши <Alt>+>).
При этом откроется окно вывода результатов. Для возврата из окна вывода в окно редактирования нажать клавишу <Enter> или <Esc>.
Чтобы одновременно видеть текст программы и результаты выполнить команду DebugOutput. Для отмены повторить ту же команду. |
