- Pascal-Паскаль
- Программирование. Стандартные функции Pascal-Паскаль
- Программирование. Стандартные функции Pascal-Паскаль
- Стандартные функции Pascal-Паскаль
- Операторы действия
- Ввод и вывод данных
- Программирование
- Исходники Pascal (127)
- Справочник
- Основные функции и процедуры
- Математические функции
- ArcTan
- Random
- Функции и процедуры преобразования
- Round
- Trunc
- Функции и процедуры для работы со строками и символами
- Concat
- Delete
- Length
- Процедуры и функции для работы с файлами
- Append
- Assign
- Close
- Erase
- Reset
- Rewrite
- Стандартные функции Pascal
- Стандартные функции Pascal
- Пользовательские функции Pascal
- Стандартные функции в Паскале
- Ход урока
- Pascal. Стандартные функции и выражения
- Стандартные функции.
- Выражения
- Видео
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)
Справочник
Справочник по паскалю: директивы, функции, процедуры, операторы и модули по алфавиту
Основные функции и процедуры
Математические функции
Синтаксис:
function Abs (X);
Действие: Возвращает абсолютное значение аргумента, в качестве которого можно использовать выражение целого или вещественного типа.
ArcTan
Синтаксис:
function Exp (X: Real): Real;
Действие: Возвращает значение, равное экспоненте аргумента.
Синтаксис:
function Ln (X: Real): Real;
Действие: Возвращает значение, равное натуральному логарифму аргумента.
Синтаксис:
function Sqr (X);
Действие: Возвращает квадрат аргумента, в качестве которого можно использовать выражение целого или вещественного типа.
Синтаксис:
function Sqrt (X: Real): Real;
Возвращает значение, равное квадратному корню из аргумента.
Random
Синтаксис:
function Odd (Число: Integer): Boolean;
Действие: Проверка нечётности числа. Если число нечётное, возвращается True, если число чётное — возвращается False.
Синтаксис:
function Pred (X);
Действие: Возвращает значение, предшествующее X (к первому элементу типа неприменима). Применима также и к символам (значениям порядкового типа данных Char ).
Синтаксис:
function Succ (X)
Действие: Возвращает значение, следующее за X (к последнему элементу типа неприменима). Применима также и к символам (значениям порядкового типа данных Char ).
Синтаксис: Inc (x); Inc (x, k);
Действие: Процедура inc(x) возвращает значение, следующее за х (для арифметических типов данных это эквивалентно оператору x := x + 1).
Процедура Inc(x, k) возвращает k-е значение, следующее за х (для арифметических типов данных это эквивалентно оператору x := x + k). Применима также и к символам (значениям порядкового типа данных Char ).
Функции и процедуры преобразования
Синтаксис:
function Int (X: Real): Real;
Действие: Возвращает целую часть аргумента как значение вещественного типа. Дробная часть аргумента при преобразовании не учитывается, т. е. функция не производит округление.
Round
Синтаксис:
function Round (X: Real): LongInt;
Действие: Возвращает округленное к ближайшему целому значение аргумента.
Trunc
Синтаксис:
function Trunc (X: Real): LongInt;
Действие: Возвращает целую часть аргумента как значение целого типа. Дробная часть аргумента при преобразовании не учитывается, т. е. функция не производит округление.
Синтаксис:
procedure Val (Строка: string; var Переменная; var Ошибка: Integer);
Действие: Выполняет преобразование строки, изображающей целое или вещественное число, в число. Полученное значение присваивается переменной, указанной при вызове процедуры. Если преобразование не может быть выполнено, то в переменную Ошибка записывается номер символа строки, который явился причиной неудачи преобразования. Если преобразование выполнено успешно, то значение сшибка равно нулю.
Функции и процедуры для работы со строками и символами
Синтаксис:
function Chr (КодСимвола: Byte): Char;
Действие: Возвращает символ с указанным кодом.
Синтаксис:
function Ord (Символ: Char): Byte;
Действие: Возвращает код указанного символа.
Concat
Delete
Синтаксис:
procedure Delete (var s: string; НомерСимвола: Integer; Сколько: Integer);
Действие: Удаляет из строки s её часть, которая начинается с символа с номером п и состоит из i символов.
Length
Синтаксис:
function Length (Строка: string): Integer;
Действие: Возвращает значение, равное количеству символов строки-аргумента.
Синтаксис:
function Pos (Строка: string; Подстрока: string): Byte;
Действие: Возвращает позицию (номер символа) подстроки в строке.
Процедуры и функции для работы с файлами
Append
Синтаксис:
procedure Append (var F: Text);
Действие: Открывает существующий файл, связанный с файловой переменной F в режиме добавления в конец файла. При попытке открыть несуществующий файл появляется ошибка времени выполнения программы.
Assign
Синтаксис:
procedure Assign (var F; ИмяФайла: string);
Действие: Связывает файловую переменную г с конкретным файлом.
Close
Синтаксис:
procedure Close (var F);
Действие: Закрывает файл, связанный с файловой переменной к.
Синтаксис:
function Eof (var F): Boolean;
Действие: Проверяет, не достигнут ли конец файла (end of file) при чтении из файла, связанного с файловой переменной f. Если указатель чтения достиг конца файла, то функция Eof возвращает значение True, в противном случае — False.
Erase
Синтаксис:
procedure Erase (var F) ;
Действие: Уничтожает файл, имя которого связано с файловой переменной F.
Reset
Синтаксис:
procedure Reset (var F [:File; RecSize: Word]);
Действие: Открывает существующий файл. Тип файла может быть любым. Если элементы файла не относятся к одному из стандартных типов, то параметр RecSize задает длину записи (в байтах). При попытке открыть несуществующий файл возникает ошибка времени выполнения.
Rewrite
Синтаксис:
procedure Rewrite (var F [:File; RecSize: Word]);
Действие: Создает и открывает файл, имя которого связано с файловой переменной F Если файл с таким именем уже существует то процедура Rewrite его уничтожает и создаёт новый.
Синтаксис:
function Eoln [ (var F: Text)]: Boolean;
Действие: Если при обращении к функции Eoln параметр не указан, то функция проверяет, не является ли очередной символ, читаемый из буфера клавиатуры, символом «новая строка». Если является, то функция возвращает значение True, в противном случае — False. Если параметр указан, то функция аналогичным образом проверяет очередной символ текстового файла, связанного с файловой переменной, указанной при вызове функции.
Синтаксис:
procedure Halt [ (КодЗавершения: Word) ];
Действие: Завершает выполнение программы и передаёт управление операционной системе.
Стандартные функции 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.
Задание. Наберите программу, протестируйте ее работоспособность, добавьте комментарий, сохраните файл, после чего распечатайте листинг.
Любые вопросы по материалу можете задать в комментариях. Возникли ли у вас какие-то сложности?
Стандартные функции в Паскале
Цели:
Оборудование: ПК, видеопроектор.
Ход урока
Чему равен результат следующих операций:
На прошлом уроке мы познакомились с вами с арифметическими операциями. Но помимо операций в языке Паскаль используются стандартные функции. Вот некоторые из них.
Стандартные математические функции Паскаля:
trunc | (7.2) | = |
trunc | (12.326) | = |
trunc | (312.96) | = |
trunc | (0) | = |
trunc | (0.259) | = |
trunc | (-2.3) | = |
trunc | (-12.926) | = |
Обсуждение результатов (каким образом получается результат).
round | (7.2) | = |
round | (312.96) | = |
round | (12.326) | = |
round | (0) | = |
round | (0.259) | = |
round | (-2.3) | = |
round | (-12.926) | = |
Найдите дробную и целую часть от значения выражения: y*sin(x)/cos(x+y).
(значения х и у вводятся с клавиатуры).
Вычислить значение выражения: 3*7 div 2 mod 7/3 – trunk (0.89) =
(выставление оценок, ответы на вопросы учащихся).
Определить последнюю цифру в произведении ab, где
Идет k-я секунда суток. Определить полное количество часов и минут, прошедших от начала суток.
Литература:
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. Центр онлайн-обучения «Фоксфорд»Скачать
Урок 2. Приоритеты операций. Стандартные функции на ПаскалеСкачать
Pascal. Часть 4. Стандартные функцииСкачать
Арифметические операции. Стандартные функции языка Паскаль. Быстрый курс программирования Pascal ABCСкачать
0000 Стандартные функции ПаскаляСкачать
Программирование на языке Паскаль: Урок 2- стандартные функции Паскаля.Скачать