Функция Odd
Функция Odd в Паскале определяет, является ли число чётным или нечётным. Синтаксис:
Функция Odd возвращает TRUE, если число является НЕчётным. Иначе возвращает FALSE.
Как определить чётное число в Паскале
Если в функцию передано чётное число, то она возвращает FALSE. Следовательно, чтобы проверить, является ли число чётным, надо результат функции сравнить с FALSE:
if not Odd(x) then WriteLn(‘x — чётное число ‘);
Как определить нечётное число в Паскале
Если в функцию передано нечётное число, то она возвращает TRUE. Следовательно, чтобы проверить, является ли число нечётным, надо результат функции сравнить с TRUE:
Функция Odd в Pascal
Функция Odd в Pascal определяет какое число: четное или нечетное.
Синтаксис:
function odd(N : LongInt) : Boolean;
function odd(N : LongWord) : Boolean;
function odd(N : Int64) : Boolean;
function odd(N : QWord) : Boolean;
Если число нечетное, то функция Odd возвращает TRUE. В противном случае, возвращается FALSE.
Как определить чётное число в Pascal
Если в функцию Odd передано чётное число, то она возвращает FALSE. Поэтому, чтобы проверить, является ли число чётным, необходимо сравнить результат функции с FALSE:
if not Odd(x) then WriteLn(‘x — чётное число ‘);
Как определить нечётное число в Pascal
Если в функциюOdd передано нечётное число, то она возвращает TRUE. Поэтому, чтобы проверить, является ли число нечётным, необходимо сравнить результат функции с TRUE:
if Odd(x) then WriteLn(‘x — нечётное число ‘);
Пример программы, где применяется функция Odd:
programoddtest;
var x : Integer;
begin
Randomize;
x := Random(100);
if Odd(x) then //Если число нечётное
WriteLn(‘x = ‘, x, ‘ — odd number’)
else //Если число чётное
WriteLn(‘x = ‘, x, ‘ — even number’);WriteLn(‘Press ENTER…’);
//Вывести числа от 1 до 8 в два столбца
for x := 1 to 8 do
if Odd(x) then Write(x, ‘ ‘)
elseWriteLn(x);WriteLn(‘Then end. Press ENTER…’);
ReadLn;
end.
Урок 7. Логика в Паскаль. Тип Boolean
Здравствуйте, дорогие читатели нашего сайта! Сегодня, мы поговорим о логических переменных типа Boolean в Паскаль, логических операциях и решим пять задач.
Для чего нужна логика в Паскаль? Вы, я надеюсь, уже научились писать простейшие линейные программы, и сейчас, наверняка, задаетесь вопросом, как же написать нелинейную программу? Для того чтобы программа была нелинейной в Паскале, как и в других языках программирования, используют логические выражения, которые принимают значения true или false. То есть, на место любого отношения в Паскале ставится true или false. Например,
Список операторов отношения:
- больше: >
- меньше: <
- больше либо равно: >=
- меньше либо равно: <=
- равно: =
- неравно: <>
Для того чтобы записать результат логического выражения, нам требуется специальная переменная. Эта переменная будет иметь тип boolean, она может принимать два значения — true или false. Как создавать простые условие вы уже поняли, но как создавать сложные условия? Для этого используются специальные логические операции: and, or, not и xor. Давайте разберем каждую операцию отдельно и составим таблицы истинности. Примем за 1 — true, а за 0 — false.
And, или конъюнкция.
Логическое умножение, истинно только тогда, когда оба простых высказываний истинны.
Or, или дизъюнкция.
Истинно, если хотя бы одно простое высказывание истинно.
Xor, или строгая дизъюнкция.
Истинно, если ровно одно из двух простых высказываний истинно.
Not, или инверсия.
Если высказывание истинно, то его отрицание — ложь и наоборот.
Задачи Boolean.
Закрепим полученные знания, решив пару задачек.
Boolean1°. Дано целое число A. Проверить истинность высказывания: «Число A является положительным».
Boolean2. Дано целое число A. Проверить истинность высказывания: «Число A является нечетным».
Для того чтобы узнать, является ли данное число нечетным в Паскале предусмотрена специальная функция Odd, которая возвращает true, если число нечетное и false, если число четное.
Boolean3. Дано целое число A. Проверить истинность высказывания: «Число A является четным».
Для того чтобы узнать является ли число нечетным, используем уже известную нам функцию, затем инвертируем результат.
Boolean7°. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Число B находится между числами A и C».
Boolean10°. Даны два целых числа: A, B. Проверить истинность высказывания: «Ровно одно из чисел A и B нечетное».
Boolean23. Дано четырехзначное число. Проверить истинность высказывания: «Данное число читается одинаково слева направо и справа налево».
Используем знания, полученные в этом уроке.
Итак, данная задача проверяет является ли введенное четырехзначное число палиндромом. Наверняка, самый известный палиндром — фраза Мальвины: «А роза упала на лапу Азора.» (Попробуйте прочитать это предложение справа налево)
На сегодня все! Не забывайте периодически заходить к нам на сайт, подписывайтесь и кликайте по кнопочкам!
1.5. Выражения в языке Pascal
С помощью операций формируются арифметические и логические выражения, которые состоят из операций и операндов, над которыми выполняются операции.
При записи арифметических выражений используются арифметические операции, среди которых сначала выполняются умножение и деление, а потом сложение и вычитание. Порядок выполнения операций можно изменить с помощью круглых скобок.
Пример. Примеры записи арифметических выражений приведены в таблице 3.
Запись на Паскале
При записи логических выражений используются операции сравнения и логические операции. Операции сравнения сравнивают значения левого и правого операндов, в результате чего логическое выражение становится истинным или ложным. Несколько логических выражений могут быть связаны с помощью логических операций.
(11 div 2 = 5) and (2*2 <> 4) false
(11 div 2 = 5) or (2*2 <> 4) true
not(11 mod 2 = 0) true
(2 <= 3) xor (11 mod 2 = 1) false
1.6. Стандартные функции в языке Pascal
В языке Pascal используются следующие математические функции (таблица 4):