Частина 2.
1. Завантажити :
а) середовищe TP70 ;
б) до 1-го вiкна редактора програму створену у першiй частині лабораторної роботи ( власний *.PAS- файл) командою FILE / OPEN.
2. Відкрити нове вікно (File/New). Записати до вікна назву Graph; ( загрузка модулю Graph , який служить для пiдтримки роботи програм у графiчному режимi).
3. Текст процедури Bar3d модуля Graph ( для прикладу) перенести з вiкна Help через внутрiшнiй буфер Clipboard до власної програми. Для цього поставити курсор під слово Graph і натиском клавiш < Ctrl > + < F1> здiйснити виклик вiкна Help з перелiком роздiлiв, по яким можна отримати допомогу. Виберемо та видiлимо один з них: Functions and Procedures ( Функции и процедуры).
4. Активiзувавши його , одержимо повторний виклик вiкна Help з перелiком iмен процедур даного модуля , серед яких видiлимо процедуру (наприклад) Bar3d i активiзуємо для неї HELP.
5. Видiливши текст даної процедури в блок (НЛКнМ і її утриманням, або <SHIFT>утримувати + клавіші-стрілка управління курсором ), здiйснити копiювання його до буферу Clipboard командою Edit / Copy example , або CTRL+<Ins>.
6. Для внесення змiн до вiкна Clipboard з текстом процедури необхiдно ативiзувати його командою Edit / Show clipboard.
7. Здiйснивши перехiд до вiкна з програмою користувача (клавiшами < Alt > + цифра ) , i вказавши курсором позицiю для вставки блоку з буфера , виконують процес вставки командою Edit / Paste ( або кл. <Shift > + < Ins > ).
8. Зняття вiдмiтки блоку здiйснити клавiшами < Ctrl > + <K> + <H> .
9. Доповнену програму запустити на компiляцiю та на виконання.
Примітка. У разі невиконання програми графіки після її запуску, потрібно вставити в процедуру Initgraph повний шлях до графічного драйвера - (… ‘..\tp70\bgi’); Або скопіювати до власної папки файл …\tp70\bgi\egavga.bgi
10..Зберегти програму у своїй папці з довільним ім'ям. Створити *.exe файл у своїй папці (див. П.9, част. 1). І продемонструвати зміст своєї папки викладачеві, який проводить роботу (аналогічно п. 10 част. 1)
Хід роботи:
Запускаю файл turbo.exe
Open F3
Save F2
Exit Alt+X
Unco Alt+Backspace
Copy Ctrl+Ins
Past Shift+Ins
Cut Shift+Del
Run Ctrl+F9
Compile Alt+F9
Make F9
Next W-F6
Prew W-Shift+F6
Close Alt+F3
Help Shift+F1
Виконую дію FILE /NEW
Набираю текст програми:
PROGRAM LAB 1;
USER CRT
{приклад вельми простої програми}
CONST N=10;
VAR
A,B:RIAL;
BEGIN
WRITELN('Введiть значення A') ; READA);
B=A+N*3,1415+ SIN2K;
WRITELN(A=' A,'B=',B) ;
END.
Зберігаю програму натиском клавіші F2. Потім знов зберігаю програму, але вже використовую функцію Save as
Використовуючи функцію Compile виправляю помилки в програмі. Написана програма без помилок, але на місці помилок підчеркнуто. Мені видає помилки в наступному порядку:
85, 36, 85, 3, 3, 91, 85, 3
Перевіривши програму я отримав такий результат:
A=1.20000000000E+01B= 4.34150000000E+01
Переглянув інформацію про слова в програмі.
Виставив команду Compile/ Destination / Disk.
Потім в Options/Directories/Exe&Tpu directory написав адресу своєї папки на диску. Натиснувши клавіші Alt+F9 в моїй папці створився файл .exe
Натиском клавіш Alt+X вийшов з програми. Запустив файл. На практичному уроці все це демонстрував.