Студопедия  
Главная страница | Контакты | Случайная страница

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатика
ИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханика
ОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторика
СоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансы
ХимияЧерчениеЭкологияЭкономикаЭлектроника

Арифметические функции

Читайте также:
  1. Cудeбныe функции князя и вeчe
  2. I. Правосознание: понятие, структура, функции и виды.
  3. I. Сущность, формы, функции исторического знания.
  4. II. Правовая культура: понятие, функции и виды.
  5. II. Функции Аппарата Правительства
  6. II. Функции школьной одежды
  7. II.2.2. Функции
  8. Int nod (int, int); - прототип нашей функции.
  9. Internet, его функции. Web-броузеры. Поиск информации в Internet.
  10. IV. Правотворчество: понятие, функции, виды. Стадии законотворческого процесса.

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 | Поможем написать вашу работу | Нарушение авторских прав




lektsii.net - Лекции.Нет - 2014-2024 год. (0.009 сек.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав