На занятии рассматривается условный оператор в Паскале (if ). Объясняется, как использовать несколько условий в одной конструкции (AND и OR ). Рассмотриваются примеры работы с оператором

Напоминаем, что данный сайт не претендует на полное изложение информации по теме. Целью портала является предоставление возможности усваивания материала на основе готовых решенных примеров по теме «Язык программирования Pascal» с практическими заданиями для закрепления материала. Представленные на сайте сайт задания по Паскалю выстроены последовательно по мере увеличения их сложности. Сайт сайт может быть использован учителями и преподавателями в качестве вспомогательного наглядного пособия.

До рассмотрения данной темы в основном использовались линейные алгоритмы в Паскале, характерные для весьма простых задач, когда действия (операторы) выполняются последовательно, одно за другим. Более сложные алгоритмы предусматривают использование конструкция ветвления.

Блок-схема условного оператора:

Условный оператор в Паскале имеет следующий синтаксис:

Сокращенный вариант:

if условие then оператор;

Полный вариант:

if условие then оператор else оператор;

Условный оператор в Паскале — if — служит для организации хода задачи таким образом, при котором изменяется последовательность выполнения операторов в зависимости от какого-либо логического условия. Логическое условие может принимать одно из двух значений: либо true (истина), либо false (ложь), соответственно, оно может быть либо истинным, либо ложным.

Составной оператор

Если при истинном условии необходимо выполнять несколько операторов, то их по правилам языка Pascal необходимо заключать в блок , начинающийся со служебного слова begin и заканчивающегося служебным словом end . Такой блок принято называть операторными скобками , а данную конструкцию — составным оператором :

Операторные скобки и составной оператор в Паскале:

if логическое выражение then begin оператор1; оператор2; end else begin оператор1; оператор2; end;

Перевод с английского оператора условия облегчит понимание его использования:

В условии (в логическом выражении) используются операторы отношения.
Рассмотрим список операторов отношения Паскаля:

• больше >
• меньше
• больше или равно в Pascal >=
• меньше либо равно в Pascal
• сравнение в Pascal =
• не равно в Pascal

Пример: найти наибольшее из двух чисел

Вариант 1	Вариант 2

Подробно разобраться в работе условного оператора в Паскале можно, просмотрев видеоурок:

Пример: вычислить значение переменной у по одной из двух ветвей

Показать решение:

var x,y:real; begin writeln ("введите х"); read(x); if x>0 then y:=ln(x) else y:=exp(x); writeln ("y=", y:6:2) {итоговое число будет занимать 6 позиций, и в нем будет 2 знака после запятой} end.

Обратите внимание на то, как в данном примере выводится y . При выводе переменных типа в pascal, можно использовать так называемый форматированный вывод , или запись с двумя двоеточиями:
y:6:2
- цифра после первого двоеточия (6) указывает на то, сколько знаков будет занимать число при выводе на экран
- цифра после второго двоеточия (2) указывает на то, сколько знаков после запятой вещественного числа будет выводиться

Таким образом, использование такой записи в pascal практически позволяет выполнить округление до сотых, тысячных и т.п.

Задача 0. Вычислить значение переменной у по одной из двух ветвей:

Задача 1. В компьютер вводятся два числа. Если первое больше второго, то вычислить их сумму, иначе - произведение. После этого компьютер должен напечатать результат и текст ЗАДАЧА РЕШЕНА

Задача 2. Дракон каждый год отращивает по три головы, но после того, как ему исполнится 100 лет - только по две. Сколько голов и глаз у дракона, которому N лет?

Логические операции в Паскале (в логическом выражении)

Когда необходимо использовать двойное условие в Pascal, то понадобятся логические операции.

• Логическая операция AND (И), поставленная между двумя условиями, говорит о том, что должны выполняться сразу оба эти условия (должны быть истинными). Логический смысл операции - "конъюнкция".
• Поставленный между двумя условиями, знак OR (ИЛИ) говорит о том, что достаточно, если будет выполняться хотя бы одно из них (одно из двух условий истинно). Логический смысл операции - "дизъюнкция".
• На языке Паскаль XOR - знак логической операции, имеющий смысл "строгая дизъюнкция" и указывающий на то, что необходимо, чтобы одно из двух условий выполнялось (истинно), а другое - не выполнялось (ложно).
• Логическая операция NOT перед логическим выражением или переменной имеет смысл "отрицание" или "инверсия" и указывает на то, что если данная переменная или выражение истинны, то их отрицание - ложь и наоборот.

Важно: Каждое из простых условий обязательно заключать в скобки.

Пример : Рассмотрим примеры логических операций в логических выражениях в Паскале

var n:integer; begin n:=6; if (n>5) and (n<10) then writeln("истина"); if (n>7) or (n<10) then writeln("истина"); if (n>7) xor (n<10) then writeln("истина"); if not(n>7) then writeln("истина"); end.

Пример: Компания набирает сотрудников от 25 до 40 лет включительно. Ввести возраст человека и определить, подходит ли он для данной компании (вывести ответ «подходит» или «не подходит»).
Особенность: надо проверить, выполняются ли два условия одновременно.

Выражения – это конструкции языка, которые задают порядок выполнения действий над элементами данных.

Выражение состоит из операндов (operand – элемент данных, участвующий в операции), объединенных знаками операций. Операндами могут быть константы, переменные и вызовы функций. Тип значения выражения определяется типом его операндов и выполняемыми над ними операциями. Например,

• выражение: b > a + 10 ;
• b - левый операнд, a + 10 - правый операнд, > - операция отношения; результат имеет логический тип.

Важно: величины, составляющие выражение, должны быть совместимых типов.

Операции могут быть унарными и бинарными. Унарная операция относится к одному операнду и записывается перед ним (например, -х ), бинарная – выражает отношение между двумя операндами и записывается между ними (например, a + b ). Операции определяют действия над операндами, выполняемыми в соответствии с приоритетами:

• Унарные -, not, ...
• Операции типа умножения: *, /, div, mod, and, …
• Операции типа сложения: +, -, or, …
• Операции отношения: =, =, …

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

В текущем уроке разберем операции отношения, арифметические и логические операции, остальные - будем рассматривать по мере изучения материала.

Арифметические выражения и операции

Выражение, составленное из операндов целочисленных или вещественных типов, объединенных знаками арифметических операций и круглыми скобками, называется арифметическим.

Результат арифметического выражения может принимать целое или вещественное значение.

К арифметическим операциям относятся:

• унарные операции: + , - для вещественных и целых чисел;
• бинарные операции: +, -, *, / для вещественных и целых чисел;
• бинарные операции: div, mod для целых чисел.

Выражения и операции отношения

Выражение, состоящее из операндов, связанных операцией отношения, называется выражением отношения.

Две операции отношения = и применяются ко всем типам, остальные - к операндам простого типа и к строкам.

Операции отношения, путем сравнения двух операндов, позволяют определить истинно (true ) или ложно (false) значение выражения.

Логические выражения и операции

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

Операндами логического выражения могут быть только данные типа boolean , результатом - значение истинно (true) или ложно (false) .

К логическим операциям, которые подчиняются стандартным правилам алгебры логики , относятся:

• унарная операция not ;
• бинарные операции and, or, xor .

Логические операции и, рассмотренные выше, операции отношения широко применяются для реализации разветвляющихся и циклических алгоритмов.

Здравствуйте, дорогие читатели нашего сайта! Сегодня, мы поговорим о логических переменных типа Boolean в Паскаль, логических операциях и решим пять задач.

Для чего нужна логика в Паскаль? Вы, я надеюсь, уже научились писать простейшие линейные программы, и сейчас, наверняка, задаетесь вопросом, как же написать нелинейную программу ? Для того чтобы программа была нелинейной в Паскале, как и в других языках программирования, используют логические выражения, которые принимают значения true или false . То есть, на место любого отношения в Паскале ставится true или false. Например,

Var A: integer; begin A:= 5; write(A > 0); {Будет выведено True.} end.

Список операторов отношения:

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

Для того чтобы записать результат логического выражения, нам требуется специальная переменная. Эта переменная будет иметь тип boolean, она может принимать два значения - true или false. Как создавать простые условие вы уже поняли, но как создавать сложные условия? Для этого используются специальные логические операции: and, or, not и xor. Давайте разберем каждую операцию отдельно и составим таблицы истинности. Примем за 1 - true, а за 0 - false.

And, или конъюнкция.

Or, или дизъюнкция.

Истинно, если хотя бы одно простое высказывание истинно.

Xor, или строгая дизъюнкция.

Not, или инверсия.

Задачи Boolean.

Закрепим полученные знания, решив пару задачек.

. Дано целое число A. Проверить истинность высказывания: «Число A является положительным».

Program Boolean1; var a: integer; begin write("Введите число A: "); read(a); writeln("Число A является положительным - ", a > 0); {Простое высказывание.} end.

. Дано целое число A. Проверить истинность высказывания: «Число A является нечетным».

Для того чтобы узнать, является ли данное число нечетным в Паскале предусмотрена специальная функция Odd, которая возвращает true , если число нечетное и false , если число четное.

Program Boolean2; var a: integer; b: boolean; begin write("Введите число A: "); read(a); b:= Odd(a); writeln("Число A является нечетным - ", b); { Можно обойтись и без b } end.

. Дано целое число A. Проверить истинность высказывания: «Число A является четным».

Для того чтобы узнать является ли число нечетным, используем уже известную нам функцию, затем инвертируем результат.

Program Boolean3; var a: integer; b: boolean; begin write("Введите число A: "); { 6 } read(a); b:= Odd(a); { False } writeln("Число A является четным - ", not b); { True } end.

. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Число B находится между числами A и C».

Program Boolean7; var a, b, c: integer; b1, b2: boolean; begin write("Введите число A, B, C: "); read(a, b, c); b1:= (B > A) and (B < C); b2:= (B > C) and (B < A); { Надо учитывать оба варианта } writeln("Число B находится между числами A и C - ", b1 or b2); end.

. Даны два целых числа: A, B. Проверить истинность высказывания: «Ровно одно из чисел A и B нечетное».

Используем xor.

Program Boolean10; var a, b: integer; c:boolean; begin write("Введите число A, B: "); read(a, b); c:= (Odd(a)) xor (Odd(b)); { Сколько скобок 🙂 } writeln("Ровно одно из чисел A и B нечетное - ", c); end.

. Дано четырехзначное число. Проверить истинность высказывания: «Данное число читается одинаково слева направо и справа налево».

Используем знания, полученные в уроке.

Итак, данная задача проверяет является ли введенное четырехзначное число палиндромом. Наверняка, самый известный палиндром - фраза Мальвины: «А роза упала на лапу Азора.» (Попробуйте прочитать это предложение справа налево)

Program Boolean23; var a, b, c, d, e, f: integer; b1, b2: boolean; begin write("Введите число четырехзначное число: "); read(e); a:= e div 1000; b:= e mod 1000 div 100; c:= e mod 100 div 10; d:= e mod 100 mod 10; f:= d * 1000 + c * 100 + b * 10 + a; writeln("Данное число является палиндромом - ", f = e); end.

На сегодня все! Не забывайте периодически заходить к нам на сайт, подписывайтесь и кликайте по кнопочкам!

Операции языка Паскаль

Операции задают действия над операндами. В языке паскаль бывают операции бинарные и унарные. Унарные операции содержат 1 операнд, перед которым стоит знак операции. Бинарные операции имеют 2 операнда, между которыми ставится знак или символ операции. По характеру выполнения действий операции языка паскаль можно разделить на 7 групп :

• арифметические;
• отношения;
• логические;
• строковые;
• разрядные, сдвиговые;
• операции над множествами;
• операции взятия адреса.

Арифметические операции. В языке паскаль имеется одна унарная операция называемая присвоением знака минус и вторая присвоение знака плюс. Бинарными являются:

• сложение (+);
• вычитание (-);
• умножение (*);
• вещественное деление (/);
• целочисленное деление (div);
• остаток от целочисленного деления (mod).

В языке паскаль имеются три операции деления, результатом операции деления (/) будет число с дробной частью, результатом операции div - только целое число, а результатом операции mod - остаток от целочисленного деления. Примеры:

В арифметических операциях могут принять участие только операнды числовых типов. Их результатом также будет число. Число может быть целым или вещественным.

Операции отношения. К ним относятся все бинарные операции:

• больше;
• меньше;
• больше или равно;
• меньше или равно
• равно
• неравно.

Результат операций отношений может быть только переменная логического типа, она может принимать либо значение истина (True), либо значение ложь (False). Операндами в операции отношения могут быть числовые типы или типы, сводимые к числовым. Числовые типы:

• символьный - в операциях отношения сравниваются коды символов в соответствии с кодовой таблицей;
• логический - используются значения True и False, принимающие значения 1 - истина и 0 - ложь соответственно;
• строковый - составной тип, состоящий из символьного типа. Поэтому при использовании строк осуществляется сравнение последовательных символов в двух строках.

Например:

5.6 > 7 — False;

‘П’ < ‘Б’ — False;

‘Петров’ > ‘Иванов’ — True;

‘Иванов’ < ‘Иван’ — False.

Результатом логических операций будут логические значения True или False.

Унарные: NOT - отрицание.

Бинарные: AND - умножение (и); OR - сложение (или); XOR - сложение на модуль 2 (исключающее ИЛИ).

Операндами логического выражения могут быть только операции логического типа.

Строковые операции. Конкатенация (сцепление) - бинарная операция. Операндами могут быть только переменные строкового типа. Результат строковый, а действие операции заключается в сцеплении двух строк в одну:

A:=‘Иванов’

B:= ‘Александр’

Результат: Иванов Александр.

Последовательность выполнения операций на языке паскаль определяется 3 факторами:

• приоритет операций;
• порядок расположения операций;
• использование скобок.

Уровни приоритетов выполняемых операций:

• операции первой приоритетности, выполняются в первую очередь;
• операции низшей приоритетности, выполняются последнюю очередь;
• операции с равными приоритетами, выполняются слева направо в порядке их записи.

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

Логические выражения (условия) в языке Паскаль используются в операторах if и при организации повторений, а именно в циклах while и repeat–until.

Примеры логических выражений:

1 . a > 2*b

2 . sin(sqr(a)) <= exp(cos(b))–2.3

3 . (a <= 3) and (b > a/2)

Логические выражения строятся на основе операций отношения

(<, >, <= , >=, =, <>)

и логических операций

and (логическое и),

or (логическое или),

not (логическое отрицание),

xor (исключающее или).

Результатом выполнения логического выражения является логическое значение true (истина) или false (ложь). В сложных логических выражениях в первую очередь выполняются арифметические операции, затем – логические операции, а в последнюю очередь – операции отношения.

24 Pascal. Условный оператор if. Формат и принцип действия.

Структура условного оператора if имеет вид:

If <условие> then <оператор1> else <оператор2>;

где if, then, else – зарезервированные слова (если, тогда, иначе);

<условие> – логическое выражение;

<оператор1> и <оператор2> – любые операторы языка Паскаль (простые или составные).

Пример : if sin(а)>b then y:= a

Оператор if работает следующим образом:

<условие> (true (истина) или false (ложь)).

Если значение <условие> – true (истина), то выполняется <оператор1>, а <оператор2> игнорируется.

Если значение <условие> – false (ложь), то выполняется <оператор2>, а <оператор1> игнорируется.

Сокращенная конструкция оператора if

if < условие > then < оператор >;

Примеры : if a< 2*b then y: = a/2 ;

if a< 2*b then begin

B примере 1 оператор y:=a/2; является простым оператором языка Паскаль.

В примере 2 оператор begin y:=2*a; writeln(y) end; является составным оператором языка Паскаль.

Составной оператор – это группа операторов, заключенная в операторные скобки begin end:

begin <операторы>;

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

Оператор if сокращенной конструкции выполняется следующим образом.

Вычисляется значение логического выражения <условие>.

Если результатом является значение true, управление передается на <оператор>.

Если результатом условия является значение false, <оператор> игнорируется, и управление выполнением программы передается на следующий оператор в программе.

25 Pascal. Оператор выбора case…of. Формат и принцип действия. Оператор выбора Case

Если условный оператор if позволяет реализовать одно из двух возможных продолжений программы, то оператор case предоставляет возможность выбрать одно из нескольких продолжений программы.

Данный оператор имеет структуру:

case <выражение-селектор> of

<список1>: <оператор1>;

<список2>: <оператор2>;

<список N >: <оператор N >

else <оператор>

Здесь <выражение-селектор> – выражение или, в частном случае, переменная любого скалярного типа, кроме вещественного (обычно это переменная типа byte, integer, boolean или char);

<список1, список2, ... списокN> – списки констант, значения которых может принимать выражение-селектор. Каждый из списков может представлять собой константу, диапазон констант или несколько констант (диапазонов), разделенных запятой.

Конструкция else в операторе case может отсутствовать.

Оператор case выполняется следующим образом.

Анализируется значение выражения-селектора.

Если значение выражения-селектора не совпадает ни с одной из констант в списках констант, управление передается оператору, стоящему после слова else, а в случае отсутствия слова else, оператору, следующему за оператором case.