Сценарий работы в интегрированной среде Turbo pascal

1. Перед началом работы в среде Turbo PASCAL необходимо уяснить условие поставленной задачи. При необходимости, если задача сложная, необходимо составить алгоритм ее решения, т.е. указать набор действий, который необходимо выполнить для получения требуемого результата.

1.1. Четко разделить данные задачи на ВХОДНЫЕ, которые при работе программы вводятся с помощью клавиатуры, из файла или задаются в программе, ПРОМЕЖУТОЧНЫЕ – для хранения промежуточных результатов работы программы и ВЫХОДНЫЕ, которые получаются в результате работы программы и выводятся на экран, в файл, на принтер или передаются другой программе.

1.2. Для всесторонней проверки функционирования разрабатываемой программы (ее верификации), составить варианты ВХОДНЫХ и ВЫХОДНЫХ данных. Затем для вариантов ВХОДНЫХ данных получить ВЫХОДНЫЕ данные вручную, с помощью калькулятора (тестовый пример) или с помощью одной из систем компьютерной алгебры (например, MathCAD).

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

При необходимости записать этот алгоритм на бумаге.

2. Составить и записать на листе бумаги программу для решения поставленной задачи и варианты данных, используя для этих целей язык Turbo PASCAL.

3. Загрузить в компьютер среду Turbo PASCAL с помощью меню кнопки Пуск или с помощью пользовательского меню файл-менеджера Far – < F2 >.

4. Для набора новой программы создать, при необходимости, файл с именем NONAME00.PAS с помощью опции File → New.

Для продолжения работы, с уже имеющейся на диске программой, необходимо загрузить файл с именем *.pas (* – конкретное имя файла пользователя) с помощью опции File → Open (или нажатия клавиши < F3 >).

5. Произвести набор программы, полученной в пункте 2, или коррекция имеющейся программы. При этом используются команды меню опции Edit и клавиши и сочетания клавиш для перемещения курсора, редактирования программы приведенные выше.

6. После завершения редактирования текста программы необходимо отладить полученную программу. Процесс отладки программы состоит из нескольких этапов (шагов): компиляция, компоновка, выполнение. Причем на каждом из этих этапов не исключено возникновение ошибок, которые являются результатом неверного использования конструкций языка программирования Turbo PASCAL (синтаксических ошибок), неверного задания данных для программы, смысловых (семантических) ошибок в программе и т.д.

Для компилирования и компоновки программы (I этап отладки программ) необходимо выполнить опцию Compile → Compile (или нажать клавиши < Alt >+< F9 >). При успешной компиляции программы (выдачи сообщения «Compilesuccessful: Pressanykey») можно переходить к очередному пункту.

Если в процессе компиляции или компоновки программы возникают ошибки, то среда Turbo PASCAL сообщает об этом следующим образом. Во-первых, выдачей диагностического нумерованного сообщения в красной строке, и, во-вторых, с помощью указания курсором на конструкцию языка в программе, где возникла ошибка. В случае затруднения ее интерпретации необходимо обратиться к службе помощи среды Turbo PASCAL. Наиболее оперативную помощь можно получить сразу же после выдачи сообщения об ошибке, нажав клавишу < F1 >. Перевод диагностических сообщений и их пояснение дано в Приложении.

После выяснения причин возникновения ошибки в программе, необходимо возвратиться в пункт 5 и внести изменения в текст программы, которые позволят исключить выявленную ошибку.

7. Если программы простые и находятся в одном файле, то после успешного компилирования весь процесс компилирования и компоновки программы завершается. В итоге пользователь получает исполняемый код программы – файл с расширением .exe, имя которого совпадает с именем файла, содержащим текст программы на языке Turbo PASCAL. Этот файл помещается на определенный диск и в определенный каталог. В нашем случае в папку пользователя. Если программа состоит из нескольких файлов, то для их объединения используются другие опции компиляции (Make, Build и т.д.).

8. Для выполнения программы в оперативную память ПЭВМ загружается исполняемый файл *.exe и ему передается управление компьютером. Для этого необходимо выполнить опцию Run -> Run (или нажать клавиши < Ctrl >+< F9 >). После этого начинается исполнение программы, ввод данных (если он предусмотрен) с клавиатуры или из файла и выдача получаемых данных на экран дисплея, в файл или на принтер. Если выдача результатов происходит на экран дисплея, то результат работы программы, после ее завершения, можно просмотреть, нажав клавиши < Alt >+< F5 >.

Если программа отлажена ранее, то можно совместить этапы компиляции и компоновки с этапом загрузки и выполнить сразу опцию Run -> Run (или нажать клавиши < Ctrl >+< F9 >).

9. При возникновении ошибок на этапе выполнения программы необходимо выяснить тип ошибки и причину ее возникновения.

Для этого можно использовать службу помощи среды Turbo PASCAL, аналогично тому, как она использовалась на этапе компиляции программы, т.е. при выдаче диагностического нумерованного сообщения нажать клавишу < F1 > и обратиться к Приложению. Кроме этого, для идентификации ошибки на этапе выполнения можно использовать несколько видов отладочных средств среды Turbo PASCAL:

• по операторное выполнение программы (опция Run → Traceinto или нажатие клавиши < F7 >);

• по операторное выполнение главной программы без входа в подпрограммы (опция Run → Stepover или нажатие клавиши < F8 >). В этом случае подпрограммы исполняются как единый оператор;

• выполнение части программы, не вызывающей сомнение (опция Run → GotoCursor или нажатие на клавишу < F4 >), а далее ее тестирование по операторам (использование двух предыдущих видов отладочных средств).

Для завершения отладочного режима работы необходимо выполнить опцию Run → Programreset (или нажать клавиши < Ctrl >+< F2 >), при этом в тексте программы пропадает синяя полоса.

После выяснения причин возникновения ошибки в программе, необходимо возвратиться в пункт 5 для внесения изменений в текст программы, которые позволят исключить выявленную ошибку.

10. После успешного завершения работы программы необходимо проанализировать полученные результаты (пользовательский экран вызывается нажатием клавиш < Alt >+< F5 >). Сверить результаты с теми, которые прогнозировались в пункте 1 для тестовых примеров.

Для анализа вариантов исходных данных (пункт 1.2) необходимо возвращаться к пункту 8 и выполнять программу столько раз, сколько имеется вариантов.

Если полученные результаты после работы программы не соответствуют заданию (или пользователь сомневается в их правильности), необходимо тщательно проанализировать ВХОДНЫЕ и ВЫХОДНЫЕ данные программы (тип данных, формат их ввода-вывода и т.д.), выбранный алгоритм (текст программы) на предмет его соответствия условиям поставленной задачи. После обнаружения неточностей необходимо вернуться в пункт 5 и внести требуемые изменения в текст программы.

11. После полного решения поставленной задачи, или окончания сеанса работы в среде Turbo PASCAL необходимо в первую очередь сохранить все программы (данные) в файлах, используя опции File → Save (нажатие клавиши < F2 >) или опцию File (SaveAs.

Выход из среды Turbo PASCAL осуществляется при выполнении опции File → Exit (нажатие клавиш < Alt >+< X >).

 

Практическая часть

1) Выполнили упражнение и задание, представленные в разделе.

2) Для проверки правильности работы программы, которая вычисляет корни квадратного уравнения, составили собственные наборы входных и выходных данных.

А) a=2, b= -3, c=1

D = 1, =>D>0, значит уравнение имеет два действительных разных корня.

2x²– 3x +1 = 0

D= 9 - 4*2*1 = 1

X_1,2 = (3 +- 1)/4

X₁ = 1 X₂ = 0,5

 

Б) a=9, b=6, c=1

D=0, значит уравнение имеет два действительных, одинаковых корня.

2x² – 3x +1 = 0

D= 9 - 4*2*1 = 1

X_1,2 = (3 +- 1)/4

X₁ = 1 X₂ = 0,5

 

B) a=2, b=-3, c=4

D=-23, =>D<0, значит уравнение не имеет действительных корней, а имеется два комплексносопряженных корня.

2x² – 3x +4 = 0

D= 9 – 4*2*4 = -23

Два комплексносопряженных корня

 

Г) a=0, b=10, c=20

При нахождении корней получается, что знаменатель обращается в ноль, значит a=0 недопустимое значение.

0x² + 10x +20 = 0

D= 100 – 4*0*20 = 100

X_1,2= (-10 +- 10) / 0

Корней нет

 

3) Сравнили ответы, произведённые с помощью ручных вычислений, и ответы, произведённые с помощью программы. Оба набора данных равны.

 

 

 

Вывод

В процессе выполнения лабораторной работы был прочитан предоставленный лекционный материал и выполнено практическое задание, что позволило ознакомиться с основными возможностями интегрированной среды 7 Turbo PASCAL, а также освоение алгоритма (технологии) решения вычислительных задач с помощью данной системы программирования.

 

Program Var2;

usesCrt;

Label RRR;

Var

a,b,c: Real;

x1d, x2d, x1m, x2m: Real;

D:Real;

Begin

ClrScr;

Write('Vvedite a');

Readln(a);

Write('Vvedite b');

Readln(b);

Write('Vvedite c');

Readln(c);

If a=0.0 Then Begin

Writeln ('Koefficient a raven 0, yravnenie ne imeetkornei');

Goto RRR;

End;

D:=b*b-4*a*c;

If D>0 Then Begin

x1d:=(-b - sqrt(D))/(2*a); x2d:=(-b+sqrt(D))/(2*a);

Writeln ('Yravnenieimeetdvadeistvitelnihraznihkornia.');

Writeln('x1= ',x1d:9:3);

Writeln('x2= ',x2d:9:3);

End

Else Begin

If D=0 Then Begin

x1d:= -b/(2*a);

x2d:= -b/(2*a);

Writeln('Yravnenieimeetdvadeistvitelnihodinakovihkornia.');

Writeln('x1= ',x1d:9:3);

Writeln('x2= ',x2d:9:3);

End

Else Begin

Writeln('x1= ',x1d:9:3,'- ',x1m:9:3,'*i');

Writeln('x2= ',x2d:9:3,'+ ',x2m:9:3,'*i');

If D<0 Then Begin

Writeln(' Yravnenieimeetdvakompleksnosopriajenihkornia');

End

End;

End; RRR: End.