Читайте также:
|
|
B) Каталог
C) Директория
D) Ішкі каталог
E) Ішкі диpектоpия
$$$
FREE PASCAL
Цель работы: изучить структуру интегрированной среды разработки (ИСР) приложений Free Pascal и научиться создавать простейшие программы на языке Pascal.
Порядок выполнения работы
Ø Изучите теоретический материал к лабораторной работе.
Ø Наберите и отладьте все примеры.
Ø Выполните задания для самостоятельной работы.
Ø Оформите отчет (тема, цель, задания для самостоятельной работы– формулировка и отлаженная программа с результатами).
Ø Ответьте на контрольные вопросы.
Теоретическое введение
Примеры работы при создании и отладке новой программы.
1. Для запуска Free Pascal выполните
ПУСК - Программы – Free Pascal-Free Pascal
2. Для открытия окна редактирования кода программы, в строке меню выполните
File – New
3. Установите папку для сохранения программы File - Change dir (определите свою папку на сетевом диске).
4. Наберите текст новой программы:
program lab_1;
uses
Crt;
Begin
ClrScr;
Write(’Free Pascal’);
Readkey;
end.
5. Запустите программу (команда Run встроке меню или сочетание клавиш Ctrl+F9).
6. Выполните сохранение программы в своей папке назвав файл Lab_1.pas
7. Вернитесь в окно редактора кода программы, нажав клавишу Esc
8. Измените строку текста программы WriteLn (’Free Pascal’);
9. Запустите программу. Чем отличается результат работы программы от предыдущего?
WRITELN английское слово Write означает писать, Ln – сокращение от слова Line – линия (строка). Суффикс Ln означает, что каждый вывод будет осуществляться в новую строку.
10. Измените строку текста программы WriteLn(’Free Pascal’:20);
11. Запустите программу. Чем отличается результат работы программы от предыдущего?
12. Процедура writeln – это команда компьютеру что–нибудь напечатать. Причём это может быть не только какое – либо сообщение или число, но и весьма сложные арифметические выражения. Например, можно напечатать значение суммы. Измените текст программы. | |||
Программа | Пояснения | ||
BEGIN ClrScr; | начало – служебное слово, означающее начало исполняемой части программы | ||
Writeln(123+456); ReadLn; | тело программы | ||
END. | конец – служебное слово, означающее конец исполняемой части программы. В конце программы ставится точка. | ||
Запустите программу. На экране появился результат суммирования.
13. Измените строку программы writeln(‘123+456=’,123+456);
14. Запустите программу. Чем отличается результат работы программы от предыдущего?
15. Сохранить текст программы на диск.
Арифметические функции
В Паскале предусмотрена возможность вычисления многих элементарных функций, таблица 1. Запись функций производится аналогично их записи в математике: имя функции и аргумент вскобках (обязательно). Стандартные функции могут входить в арифметические выражения. В качестве аргумента также можно использовать арифметическое выражение.
Таблица 1 -Стандартные функции языка Паскаль
Pascal | Математическая функция | Пояснение | |
Abs(x) | | x | | Модуль числа x | |
ArcTan(x) | arctg x | Арктангенс числа x, результат в радианах. | |
Cos(x) | cos x | Косинус числа x | аргумент задаётся |
Sin(x) | sin x | Синус числа x | в радианах |
Exp(x) | e в степени x | ||
Frac(x) | { x } | Дробная часть числа x | |
Int(x) | [ x ] | Целая часть числа x, результат – вещественного типа. | |
Ln(x) | ln x | Натуральный логарифм числа x | |
Pi | 3.1415926... | Число Пи | |
Sqr(x) | x в квадрате | ||
Sqrt(x) | корень квадратный из x | ||
Trunc(x) | Целая часть x | результат | |
Round(x) | Округление x до ближайшего целого | целого типа | |
Odd(x) | True, если x – нечётное, False, если x – чётное. |
Если необходимо вычислить функцию, которая не входит в набор стандартных, то нужно выразить её с помощью знаков арифметических действий и стандартных функций. Недостающие тригонометрические и логарифмические функции определяются формулами, приведенными в таблице 2.
Таблица 2 – Представление нестандартных функций
Название | Формула |
Тангенс x | |
Котангенс x | |
Арксинус x | |
Арккосинус x | |
Арккотангенс x | |
Логарифм числа x по основанию a | ; |
Возведение в степень y положительного числа x | . |
16. Используя процедуру вывода на экран WRITELN и данные из таблиц 1 и 2, вычислите значение выражения .
17. Измените строку программы writeln(‘Sqrt(145)=’,Sqrt(145));
18. Запустите программу.
19. Используя процедуру вывода на экран WRITELN и данные из таблиц 1 и 2, вычислите значение выражения .
20. В соответствии с таблицей 2 (последняя строка) , в соответствии с таблицей 1
21. Измените строку программы
writeln(‘Exp(1/5*Ln(169))=’,Exp(1/5*Ln(169)));
22. Запустите программу.
23. Отформатируйте результат, для этого измените строку программы
writeln(‘Exp(1/5*Ln(169))=’,Exp(1/5*Ln(169)):2:2);
24. Запустите программу. Чем отличается результат работы программы от предыдущего?
Дата добавления: 2014-12-18; просмотров: 18 | Поможем написать вашу работу | Нарушение авторских прав |