Некоторые стандартные переменные и встроенные функции языка Pascal.
Таблица 3.1. – Некоторые стандартные переменные языка Pascal
В языке Pascal существует несколько видов стандартных переменных, кроме того, пользователь может задать свой тип переменной. Мы рассмотрим четыре наиболее употребляемых типа. Их наименования и основные свойства представлены в виде таблицы.
В программировании принято говорить, что функция, рассматриваемая также как обращение, возвращает некоторое значение, называемое, соответственно, возвращаемым значением функции. В приведённой ниже таблице представлены основные свойства некоторых стандартных встроенных функций языка Pascal, в частности, их синтаксис, тип аргумента и тип возвращаемого значения (результата).
Таблица 3.2. – Некоторые стандартные встроенные функции языка Pascal
| Обращение | Действие | Тип аргумента | Тип результата |
| Pi | Вызов числа π=3,14159… | – | Вещественный |
| sin(x) | Синус х | Вещественный | Вещественный |
| cos(x) | Косинус х | Вещественный | Вещественный |
| arctan(x) | Арктангенс х | Вещественный | Вещественный |
| sqr(x) | Квадрат х | Целый/Веществ. | Целый/Веществ. |
| sqrt(x) | Корень квадратный из х | Целый/Веществ. | Вещественный |
| abs(x) | Абсолютная величина (модуль) х | Целый/Веществ. | Целый/Веществ. |
| round(x) | Округление | Вещественный | Целый |
| trunk(x) | Отбрасывание дробной части числа | Вещественный | Целый |
| exp(x) | Функция e x (экспонента) | Вещественный | Вещественный |
| ln(x) | Натуральный логарифм х | Вещественный | Вещественный |
| random | Случайное число в диапазоне 0…1 | – | Вещественный |
| random(x) | Случайное целое число в диапазоне 0…(х-1) | Целый | Целый |
| randomize | Запуск генератора (псевдо)случайных чисел | – | – |
Для возведения числа x в произвольную степень y используется формула
которая следует из тождества:
Для перевода градусной меры угла в радианную используется формула:
Вопросы для самоконтроля
1. Что такое интегральная среда программирования?
2. Как перейти из окна редактирования в пользовательское окно и обратно?
3. Что такое блок заголовка программы?
4. Что такое тело программы?
5. Как записывается простейшая программа на языке Pascal?
6. Синтаксис оператора ввода языка Pascal.
7. Синтаксис оператора вывода языка Pascal.
8. Перечислить типы переменных языка Pascal.
9. Формула возведения любого числа в любую степень в языке Pascal.
1. Черняков, М.В.Основы информационных технологий: учебник для ВУЗов. / Черняков М.В., Петрушин А.С. М.: ИКЦ Академкнига, 2007. – 407 с.
2. Информатика: базовый курс. / Симонович П.А. [и др.] – СПб.: Изд-во «Питер», 2008, 640 с.
3. Арсеньев, Ю.Н. Информационные системы и технологии/Арсеньев, Ю.Н.. – М.: ЮНИТИ-ДАНА, 2009. – 447 с.
4. Розанов, А.В. Программирование персональных компьютеров. / Розанов А.В., Федоров В.К. Электронный учебник на CD-ROM. Саратов, 2006
1. Кашина, И.А.Информационно-правовые системы в экономической деятельности. / Кашина И.А. [и др.] –М.: ДМК-ПРЕСС, 2008.
2. Лихтеншейн, В.Е. Информационные технологии в бизнесе: практикум. / Лихтеншейн В.Е., Росс Г.В. – М.: ФиС, 2008. – 509 с.
3. Макаров, В.Ф. Аутентификация электронного документооборота и защита информации с использованием методов ассиметричного преобразования данных / Макаров В.Ф., Нечаев Д.Ю., Уколов В.С. – М.: РГТЭУ, 2007. – 58 с.
4. Барановская, Т.П.Информационные системы и технологии в экономике / Барановская Т.П. [и др.] – М.: Финансы и статистика, 2007. – 412 с.
5. Якубайтис, Э.А. Информационные сети и системы: справочная книга Якубайтис Э.А.. – М.: Финансы и статистика, 2008
АЛГОРИТМЫ И ПРОГРАММЫ РАЗВЕТВЛЯЮЩЕЙСЯ СТРУКТУРЫ. ОПЕРАТОРЫ: УСЛОВНЫЙ, ВЫБОРА И ПЕРЕХОДА.
Источник
Стандартные (встроенные) функции
Приоритет операций и отношений в выражениях
В математике, как всем известно еще со школы, всегда сначала выполняется умножение и деление, и лишь затем – сложение и вычитание.
Выражение в языке Паскаль состоит из констант, переменных, указателей функций, знаков операций и скобок. Выражение задает правило вычисления некоторого значения. Порядок вычисления определяется старшинством (приоритетом) содержащихся в нем операций. В языке Паскаль принят следующий приоритет операций.
При построении выражений на языке Паскаль программист может воспользоваться одной из существующих стандартных функций. Ниже приводится список основных из таких функций.
| Функция | Входные данные | Выходные данные | Описание |
| Abs(X) | целое веществ | целое веществ | Возвращает модуль числа X |
| Sqr(X) | целое веществ | целое веществ | Возвращает квадрат числа X |
| Sqrt(X) | целое веществ | вешеств веществ | Возвращает корень числа X |
| Succ(X) | целое символь | целое символь | Возвращает значение, следующее за X |
| Pred(X) | целое символь | целое символь | Возвращает значение, предшествующее X |
| Sin(X) | целое веществ | веществ веществ | Возвращает синус числа X, где X – угол в радианах |
| Cos(X) | целое веществ | веществ веществ | Возвращает косинус числа X, где X – угол в радианах |
| Arctan(X) | целое веществ | веществ веществ | Возвращает арктангенс числа X |
| Pi | веществ | Возвращает число Пи | |
| Ln(X) | целое веществ | веществ веществ | Возвращает натуральный логарифм числа X |
| Exp(X) | целое веществ | веществ веществ | Возвращает число e в степени X |
| Round(X) | веществ | целое | Возвращает число, равное целой части числа X – округление по правилам математики |
| Trunc(X) | веществ | целое | Возвращает число, равное целой части числа X |
| Int(X) | веществ | веществ | Возвращает число, равное целой части числа X |
| Frac(X) | веществ | веществ | Возвращает число, равное дробной части числа X |
| Odd(X) | целое | веществ | True, если число нечетное |
| Ord(C) | символь | целое | Возвращает число, соответствующее символу C в ASCII-таблице |
| Chr(K) | целое | символь | Возвращает символ, соответствующий ASCII-коду числа K |
| UpCase(C) | символь | символь | Возвращает число, соответствующее символу C в ASCII-таблице |
sqrt (9) + sqr (2) * trunc (pi)
Сначала выполняется умножение. Для этого необходимо выполнить функции sqr(2) – возведение в квадрат (результат 4), и trunc(pi) – взятие целой части. При этом в качестве аргумента второй функции выступает другая функция – pi. В результате получаем 3 (целая часть от 3.14). Перемножая 4 и 3, получаем 12.
Следующая операция – сложение. Здесь сначала выполняется функция sqrt(9) – извлечение корня (результат 3). В итоге получаем, что представленное выше выражение возвращает результат 15.
Теперь посмотрим, какого типа будет полученный результат. Функция sqr возвращает целый результат, т.к. аргумент целого типа. Функция trunc всегда возвращает целое. Произведение двух целых дает целое. Функция sqrt всегда возвращает вещественное значение. Складывая целое и вещественное, получаем вещественное. Таким образом, результатом нашего выражения будет вещественное значение 15.0.
Результат выражения имеет вещественный тип, т.к. здесь присутствуют такие операции, как извлечение корня и деление, которые всегда возвращают результат вещественного типа независимо от операндов.
sqrt(5+sqr(2)) > 4 – sqr – квадрат, т.е. sqr(2)=4. 5+4=9. sqrt – корень, т.е. sqrt(9)=3. В итоге получаем 3>4, что не является истиной, следовательно, результатом данного выражения будет False.
Подставляем в формулу вместо x число 5. Получаем 5 / 2 = 2.5. Функция round производит округление числа по законам математики, следовательно, round (2.5) = 3. Далее результат возводим в квадрат – sqr (3) = 9. Наконец, функция odd(x) возвращает True, если целое число x является нечетным, и False, если x – четное (т.е. проверка числа на нечетность). Следовательно, odd(9) = True. Результат выражения – True.
Указать порядок выполнения операций: true or false and true.
Согласно приоритетам, сначала выполнится операция AND и лишь затем – OR. Результатом выражения станет True.
Указать порядок выполнения операций: not b = a and c xor d.
Согласно приоритету, сначала выполнится операция NOT, затем AND, далее XOR и лишь затем «=». Обратите внимание, что все перечисленные операции имеют разный приоритет.
Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет
Источник
Pascal-Паскаль
Программирование. Стандартные функции Pascal-Паскаль
Программирование. Стандартные функции Pascal-Паскаль
Стандартные функции Pascal-Паскаль
| Стандартные математические функции Турбо Паскаля | |||
|---|---|---|---|
| Обращение | Тип аргумента | Тип результата | Примечание |
| Abs(x) | Real, integer | Тип аргумента | Модуль аргумента |
| ArcTan(x) | Real, integer | Real | Арктангенс (значение в радианах) |
| Cos(x) | Real, integer | Real | Косинус, угол в радианах |
| Exp(x) | Real, integer | Real | Экспонента |
| Frac(x) | Real | Real | Дробная часть числа |
| Int(x) | Real, integer | Real | Целая часть числа |
| Ln(x) | Real, integer | Real | Логарифм натуральный |
| Pi | Нет | Real | 3,141592653 |
| Sin(x) | Real, integer | Real | Синус, угол в радианах |
| Sqr(x) | Real, integer | Тип аргумента | Квадрат аргумента |
| Sqrt(x) | Real, integer | Real | Корень квадратный |
| Random | Нет | Real | Псевдослучайное число в интервале [0, 1] |
| Random(I) | Integer | Integer | Псевдослучайное число в интервале [0, I] |
| Round(x) | Real | Integer | Округление до ближайшего целого |
| Trunc(x) | Real | Integer | Отбрасывание дробной части числа |
Порядок вычислений в выражениях следующий:
Хотя нет ограничений на сложность выражений, однако выражения, содержащие более 7 операндов, трудны для чтения и понимания и поэтому такие выражения не рекомендуется использовать.
Выражение на Паскале: exp(3*ln(x)/2)-7*x+sin(x+2)/cos(x+2)
Операторы действия
Пример оператора присваивания
Оператор присваивания, несмотря на кажущуюся простоту, имеет очень важное алгоритмическое значение.
Удобно считать, что выполнение присваивания переменной некоторого значения означает помещение этого значения в выделенный для переменной ящик. При этом каждый запоминающий ящик обладает следующими свойствами.
Ввод и вывод данных
Пример ввода данных с клавиатуры
read(a,b,c);
readln(a,b,c);
Вывод данных на экран производится с помощью стандартной процедуры write( ) или ее разновидности writeln( ).
Список вывода может содержать константы, переменные, выражения, формат вывода. Выражения в списке вывода разделяются запятыми.
Пример вывода данных на экран
write(a,b,c);
writeln(a,b,c);
Окончание ln в имени процедуры означает, что курсор автоматически будет переведен в начало следующей строки экрана.
Программирование
Исходники Pascal (127)
Справочник
Справочник по паскалю: директивы, функции, процедуры, операторы и модули по алфавиту
Источник
Pascal. Стандартные функции и выражения
Стандартные функции.
В программировании, довольно часто приходиться выполнять однотипные действия, причем в задачах разного уровня и класса. И для ускорения процесса написания кода эти действия выносят в специальные подпрограммы – стандартные функции. Обращение к такой подпрограмме происходит по ее имени, а в скобках указывается значение аргумента. В следующей таблице указаны те стандартные функции, которые используются в языке программирования Pascal.
| Функция | Назначение |
| ABS(x) | Вычисление абсолютного значения x: |х| |
| SQR(x) | Вычисление квадрата x: x*x |
| SIN(x) | Вычисление синуса x: sin x |
| COS(x) | Вычисление косинуса x: cos x |
| ARCTAN(x) | Вычисление арктангенса x: arctg x |
| EXP(x) | Вычисление экспоненты (числа Е) в степени x |
| EXP10(x) | Вычисление 10 в степени x |
| LN(x) | Вычисление натурального логарифма x |
| LOG(x) | Вычисление десятичного логарифма x |
| SQRT(x) | Вычисление квадратного корня из x |
| A DIV B | Вычисление частного при делении А на В с отбрасыванием остатка |
| A MOD B | Нахождение остатка от делении А на В |
| TRUNC(x) | Нахождение целой части x |
| RANDOM(x) | Псевдослучайное число в интервале [0, x] |
| ROUND(x) | Округление значения x в сторону ближайшего целого |
| ODD(x) | Проверяет аргумент на нечетность. Результат TRUE, если аргумент нечетный, FALSE – если четный. |
| ORD(x) | Возвращает порядковый номер аргумента и, как следствие, преобразует величину порядкового типа в величину целого типа. |
| CHR(x) | Определение символа языка Паскаль по его порядковому номеру |
| SUCC(x) | Нахождение элемента, идущего после данного в перечне допустимых элементов |
| PRED(x) | Нахождение элемента, идущего перед данным в перечне допустимых элементов |
| FRAC(X) | Возвращает дробную часть x |
| INT(X) | Возвращает целую часть x |
| Pi | Значение математической постоянной π |
| EOF(x) | Возвращает TRUE, если файл находится в стоянии “конец файла”, иначе FALSE, если нет конца файла |
Выражения
Выражение состоит из переменных, констант, полей в записях, указателей функций, круглых скобок и знаков операций. Для корректной записи выражений необходимо знать не только как обозначаются те или иные операции, функции и т. п., но также стоит предусмотреть приоритеты их выполнения, математические и логические правила, а также некоторые тонкости самого языка. Для более углубленного изучения выражений, стоит рассмотреть несколько примеров.
1) 12+3*3=21 (12+3)*3=45
2) ( a >1) and ( a 3) (a+3>0) and (a+3 1) and (b
Логическая операция OR (или) суть дизъюнкция в логики и поэтому имеет следующую таблицу истинности:
Ложь имеет место только когда X и Y ложны (нули). В том случае, чтобы истина возвращалась только тогда, когда одно из условий верно следует применить оператор XOR (исключающее или):
(a+3>0) and (a+3 1) and (b
4) x ^( a ) = exp( a *ln( x ))
В Pascal нет функции возведения числа в степень (кроме степени 2), поэтому существует два пути:
1 — умножать число само на себя, какое то количество раз;
2 — воспользоваться функциями экспоненты и натурального логарифма.
В этом примере использованы оба варианта, но если степень, в которую необходимо возвести число, достаточно велика, то предпочтение следует отдать второму способу.
Источник
Стандартные функции Pascal
В программировании, как и в любой другой науке со временем накапливается опыт и способы решения разных задач становятся все более совершенными. При этом решения многих задач – универсальные.
Поэтому нет никакого смысла писать один и тот же алгоритм для их решения, если он уже давно известен и написан программистами. Подобные алгоритмы представлены в виде модулей и функций, а затем применяются в программах, которые пишутся в настоящее время.
Процедура или функция уже может входить в язык программирования или в модуль, который нужно «подключить» к программе. Дальше приведем стандартные функции языка программирования Pascal.
Стандартные функции Pascal
Основные или арифметические функции
| Функция | Назначение | Тип результата |
| abs (x) | абсолютное значение аргумента | совпадает с типом аргумента |
| sqr (x) | квадрат аргумента | совпадает с типом аргумента |
| sqrt (x) | квадратный корень аргумента | вещественный |
| cos (x) | косинус аргумента | вещественный |
| sin (x) | синус аргумента | вещественный |
| arctan (x) | арктангенс аргумента | вещественный |
| exp (x) | ex | вещественный |
| ln (x) | натуральный логарифм | вещественный |
| int (x) | целая часть числа | вещественный |
| frac (x) | дробная часть числа | вещественный |
Функции преобразования типов
| round (x) | — округляет вещественное число до ближайшего целого. |
| trunc (x) | — выдает целую часть вещественного числа, отбрасывая дробную. |
Пользовательские функции Pascal
Функция в Pascal – это подпрограмма, которая всегда возвращает определенное значение (в отличие от процедуры). Поэтому в теле функции ее имени присваивается результат (вычислительное значение), который она возвращает.
Другими словами, функция представляет собой подпрограмму, результатом работы которой выступает определенное значение.
Функции применяют для:
Синтаксис:
Правила применения процедур:
Задача. Найдите значения выражений:
a) (1+x)2
b) 
c) |a+ bx|
Перед тем как приступить к составлению программы, нужно перевести данные выражения с математического языка на Pascal.
a) (1+x)2 → sqr(1+x)
b) → sqrt((1+A)*5)
c) |A+ bx| → abs(A+b*x)
Теперь можно переходить к составлению самой программы.
Program Primer;
Uses
Crt;
Var
A : word; <так как подкоренное выражение должно быть положительно>
b, x, result : real;
Begin
ClrScr;
Writeln(‘Введите значения переменных (A-положительно)’);
Write(‘A=’);
Readln(A);
Write(‘b=’);
Readln(b);
Write(‘x=’);
Readln(x);
Result := sqr(1+x);
Writeln (‘sqr(1+x)=’, result);
Result := sqrt((1+A)*5);
Writeln (‘sqrt((1+A)*5)=’, result);
Result := abs(A+b*x);
Writeln (‘abs(A+b*x)=’, result);
Readln;
End.
Задание. Наберите программу, протестируйте ее работоспособность, добавьте комментарий, сохраните файл, после чего распечатайте листинг.
Любые вопросы по материалу можете задать в комментариях. Возникли ли у вас какие-то сложности?
Источник
