Сохранение текстового файла программы на диске
|
|
Для сохранения файла следует выбрать пункт Save в разделе File главного меню.
После чего в открывшемся диалоговом окне выбрать каталог для сохранения файла и задать его имя. Расширение файла при этом писать не обязательно, система сама допишет *.pas при сохранении на диске.
Предварительно можно выбрать каталог по умолчанию с помощью пункта меню Change dir. |
|
Запуск программы на компиляцию и выполнение | |
|
|
Для компиляции и выполнения программы следует выбрать пункт Run раздела Run главного меню,или нажатием горячих клавиш Ctrl+F9. |
|
Окно пользователя (UserScreen)
|
При отсутствии ошибок в тексте программы она будет скомпилирована и выполнена, результаты работы программы появятся в окне пользователя, которое можно просмотреть выбором пункта User Screen раздела Debug или нажатием горячих клавиш Alt+F5. |
Задание 2
Написать текст программы N2 в системеTurboPascal:
Uses Crt;
Var s : string;
Begin
Write(’Как Вас зовут ? ’);
Readln(s);
Writeln(’Привет, ’, s)
End.
Сохранить текст программы в своем каталоге в файле с именем Progr2.pas, выполнить компиляцию и запустить программу в работу. При выполнении программы от пользователя потребуется ввести с клавиатуры своё имя и нажать клавишуENTER. Результаты работы программы просмотреть нажатием горячих клавишAlt+F5.
Задать режим компиляции программы «На диск» – пункт Destination DiskразделаCompileглавного меню. Выполнить компиляцию (горячие клавишиCtrl-F9). После этого задать компиляцию последующих программ в памяти (Destination Memory).
Выйти из системы TurboPascal, найти в своей папке исполняемую программуProgr2.exeи проверить ее работу из операционной системыWindows.
Задание 3
Написать текст программы N3 в окне редактораTurboPascal:
Uses Crt;
Var x, y, z : real;
Begin
Write(’ x = ’);
Readln(x);
Write(’ y = ’);
Readln(y);
Z:= x + y;
Writeln(’ z = ’, z:10:2)
End.
Сохранить текст в своем каталоге в файле с именем Progr3.pas, выполнить компиляцию и пошаговое прохождение программы, для чего воспользоваться командойTrace into раздела менюRun (выполнение программы построчно с заходом во все процедуры пользователя). При многократном использовании этой команды следует пользоваться горячей клавишей –F7. Проследить в окне пользователя порядок выполнения строк программы.
В программе можно использовать комментарии– пояснительный текст, ограниченный символами{ }или(* *).Комментарий игнорируется компилятором и поэтому не оказывают влияния на выполнение программы. Обычно комментарии используют для пояснений смысла идентификаторов, операторов или частей программы.
Задание 4
Дополнить текст программы N3 операторами очистки экрана и задания цветов фона и текста, после чего выполнить программу.
Uses Crt; {использовать модуль CRT}
Var x, y, z : real;
Begin
TextColor(Yellow); {цвет символов - желтый}
TextBackground(Red);
ClrScr; {очистить экран красным цветом}
Write(’ x = ’);
Readln(x);
Write(’ y = ’);
Readln(y);
Z:= x + y;
Writeln(’ z = ’, z:10:2)
End.