Как в паскале пишется меньше или равно

Операции сравнения

Ещё один из самых распространённых типов операций — это операции сравнения. Эти операции постоянно используются в программах, потому что программы не только выполняют какие-то вычисления, но и проделывают массу других штучек. В частности, выполняют операции сравнения, то есть сравнивают что-то с чем-то.

Давайте вспомним пример программы из
предыдущего урока. там мы создали простой калькулятор, который выполнял три действия над двумя числами: сложение, вычитание и умножение.

Однако я намеренно не включил сюда операцию деления. Как вы думаете, почему? Кто-то, быть может, решит, что причиной является использование целых чисел. Ведь в Паскале они не делятся обычным способом. Но на самом деле причина не в этом.

Я не стал использовать операцию деления, потому что пользователь в качестве делителя может ввести число 0. А на ноль, как известно, делить нельзя. Поэтому программа завершится с ошибкой, и пользователь будет очень недоволен.

Как быть? Напрашивается простое решение — проверить значение второго числа, которое вводит пользователь. И если это число равно нулю, то не выполнять операцию деления.

Как сделать такую проверку программно? Да очень просто — выполнить операцию сравнения. То есть сравнить число с нулём.

В таблице 15.3 приведены операции сравнения, которые допускается использовать в языке Free Pascal.

Все эти операции сравнения известны вам из школьного курса математики. Только некоторые
операторы в Паскале обозначаются немного иначе. Единственный непонятный для вас
оператор — это оператор in. Но о нём мы пока забудем. И вспомним, когда будем изучать сложные типы данных.

Остался вопрос

как в программе использовать операторы сравнения?

Более подробно мы будем изучать это в следующих уроках. А сегодня я расскажу вам только об одной языковой конструкции Паскаля


if … then … else

Если вы знаете английский язык, то вы уже должны догадаться, что сие значит. Ну а если нет, то я поясню по-русски. Итак, эта конструкция работает так:

if (если) выполняется условие then (то)
  выполняем этот код
else (иначе) если условие не выполняется
  выполняем этот код

А теперь попробуем доработать программу из
предыдущего урока и добавить в неё операцию целого деления. Добавленный код будет выглядеть так:

if y = 0 then
  WriteLn('Error: Division by ZERO!!!')
else
  WriteLn('x div y = ', x div y);

Здесь мы сначала проверяем значение переменной у. Если это значение
равно нулю, то мы выводим сообщение об ошибке. Иначе, то есть если переменная у имеет любое другое значение (не ноль), мы выполняем операцию целого деления и выводим результат.

В языке Pascal есть ряд операций для работы с логическим типом данных — boolean.

Логическая переменная может принимать только два значения — True(истина) или False(ложь).

Операции сравнения

Сравнение — это простые условные выражения, которые сравнивают два логических значения, и возвращают True или False.

Free Pascal поддерживает такие операции сравнения:

Равно = (эквивалентно)

Возвращает True, если сравниваемые объекты равны, в ином случае возвращает False.

Не равно <>

Возвращает True, если сравниваемые объекты не равны, в ином случае — False.

Больше >

Возвращает True, если значение больше второго, иначе — False.

Больше равно >=

Возвращает True, если значение первой переменной больше или равно второй.

Меньше <

Возвращает True, если первое значение меньше второго, иначе — False.

Меньше равно <=

Возвращает True, если значение первой переменной меньше или равно второй.

Пример программы с операциями сравнения:

program Compare;
var
  x, y : integer;
begin
  x := 7;
  y := 42;
  writeln(x = y);  //Ложь
  writeln(x <> y); //Истина
  writeln(x > y);  //Ложь
  writeln(x < y);  //Истина
  readln;
end.

С помощью операций сравнения можно сравнивать различные типы данных — числа, символы, строки, логические значения, только сравниваемые переменные должны быть одного и того же типа.

Логические операции

Для составных условных конструкций применяются логические операции.
В Паскале поддерживаются следующие логические операции and, or, not, xor.

Логическое отрицание not

Возвращает True, если выражение равно False, в ином случае возвращает True.

Логическое умножение and (конъюнкция)

Логическое сложение or (дизъюнкция)

Исключающее или xor (строгая дизъюнкция)

Логические операции применяются не только к значениям типа boolean и логическим выражениям. Их можно применять к числовым значениям. При этом они работают с представлениями чисел в двоичной системе. Поскольку операции работают с битами числа, они называются битовыми.

Пример битовых операций:

program BitOperation;
var
  a, b, c : Int8;
begin
  a := not 120;   //a = -121
  b := 30 and 21; //b = 20
  c := 42 or 21;  //c = 63
  writeln('a = ', a);
  writeln('b = ', b);
  writeln('c = ', c);
  readln;
end.     

not(170₁₀) = not(01111000₂) = 10000111₂ = -121₁₀

30₁₀ and 21₁₀ = 00011110₂ and 00010101₂ = 00010100₂ = 20₁₀

42₁₀ or 21₁₀ = 00101010₂ and 00010101₂ = 00111111₂ = 63₁₀

Приоритет операций

1. Наибольший приоритет имеет оператор not;
2. Второй по приоритету and;
3. Дальше выполняется or;
4. В завершение идут операторы сравнения < > <= >= = <>.

Математические операции

В таблице приведены основные математические операции Турбо Паскаль.

*

/

+

-

div

mod

Логические операции

Над логическими аргументами в Турбо Паскаль определены следующие операции:

• NOT — логическое отрицание («НЕ»)
• AND — логическое умножение («И»)
• OR — логическое сложение («ИЛИ»)
• XOR — логическое «Исключающее ИЛИ»

Результаты выполнения этих операций над переменными А и В логического типа приведены в таблице истинности.

Операции отношения

К операциям отношения в Турбо Паскаль относятся такие операции, как:

• > — больше
• < — меньше
• = — равно
• <> — не равно
• >= — больше или равно
• <= — меньше или равно

В операциях отношения могут принимать участие не только числа, но и символы, строки, множества и указатели.

Основные математические функции

В этом разделе приведены основные математические функции, встроенные в системную библиотеку Турбо Паскаль.

Abs(X)

Возвращает абсолютное значение числа X.

Cos(X), Sin(X)

Возвращает косинус (синус) числа X, где X — угол в радианах.

Функций тангенс и котангенс в Турбо Паскале нет. Для их вычисления используйте выражение sin(x)/cos(x) (или cos(x)/sin(x) для котангенса).

ArcTan(X)

Возвращает арктангенc числа X.

Exp(X)

Возвращает число, равное e в степени X.

Ln(x)

Возвращает число, равное натуральному логарифму от числа X.

Pi

Число Пи.

Sqr(X)

Возвращает число, равное квадрату числа X.

Функции возведения в произвольную степень в Турбо Паскале нет. Используйте многократное умножение для возведения в целочисленную степень, либо функции Exp и Ln для возведения в вещественную степень.

Sqrt(X)

Возвращает число, равное квадратному корню из числа X.

Trunc(X)

Возвращает число, равное целой части числа X. (Происходит отбрасывание дробной части числа X. Результат выполнения имеет тип Longint).

Frac(X)

Возвращает число, равное дробной части числа X.

Int(X)

Возвращает число, равное целой части числа X. Результат выполнения функции — real.

Round(X)

Функция округляет число X. Возвращаемое значение имеет тип Longint.

Random(X)

Возвращает случайное целое число в диапазоне 0..X. Если аргумент опущен (Random), то возвращается случайное вещественное число от 0 до 1.

Перед использованием random в программах рекомендуется сначала инициализировать генератор псевдослучайных чисел процедурой Randomize. В противном случае при каждом запуске программы будет генерироваться одна и та же последовательность случайных чисел.

Пример. Вывод на экран 5 случайных чисел в диапазоне -10..10.

var i: integer;
begin
   randomize;
   for i:=1 to 5 do writeln(random(21)-10);
end.

Inc(X,Y)

Увеличивает значение числа X на Y. Если число Y не указано, то увеличение происходит на 1.

Dec(X,Y)

Уменьшает значение числа X на Y. Если число Y не указано, то уменьшение происходит на 1.