Оператор условия предназначен для выбора действия в зависимости от заданного условия. Общая форма условия выглядит следующим образом:
if then else ;
После ключевого слова if указывается условие от котрого будет зависить то или иное действие. После then указывается оператор который выполниться только в том случае, если условие будет истино. После else, оператор который выполнится только в том случае, если условие будет ложным.
Так же можно указать и краткую форму записи условия. В этом случае, если условие оказывается ложным, то никаких действий не выполняется, а работа переходит к следующему оператору.
if then ;
Пример использования условия для нахождения меньшего из двух переменных a и b.
if a < b then min := a else min := b;
В качестве условий можно указывать: = — равно; > — больше; = — больше или равно; — не равно.
Если в качестве выполняемого действия необходимо указать несколько операторов, то их необходимо взять в операторные скобки begin .. end;.
Программа -тест на языке паскаль
if a < b then begin min := a; max := b; end else begin min := b; max := a; end;
Так же в качестве задания условия можно использовать вычисления. При этом выражение будет вычислено и проверено на истинность или ложность.
if a mod 2 = 0 then a := a + 1;
В качестве условий можно задавать и логические конструкции объединяя простые условия словами and, or, not, xor. В таком случае, простые условия должны быть взяты в скобки.
if (a < b) and (a < c) then min := a; if (b < a) and (b < c) then min := b;
if a > 0 then Write(‘Положительное’) else if a < 0 then Write(‘Отрицательное’) else if a = 0 then Write(‘Ноль’) else Write(‘Это не число!’);
Источник: barzunov.ru
Условный оператор
Условный оператор имеет полную и краткую формы.
Полная форма условного оператора выглядит следующим образом:
if условие then оператор1
else оператор2
В качестве условия указывается некоторое логическое выражение. Если условие оказывается истинным, то выполняется оператор1 , в противном случае выполняется оператор2 .
Краткая форма условного оператора имеет вид:
if условие then оператор
Если условие оказывается истинным, то выполняется оператор , в противном случае происходит переход к следующему оператору программы.
В случае конструкции вида
if условие1 then
if условие2 then оператор1
else оператор2
else всегда относится к ближайшему предыдущему оператору if , для которого ветка else еще не указана. Если в предыдущем примере требуется, чтобы else относилась к первому оператору if , то необходимо использовать составной оператор:
if условие1 then
begin
if условие2 then оператор1
end
else оператор2
Источник: pascalabc.net
Pascal | Ввод и вывод данных
Программа паскаль если то

«Программы без ошибок можно написать
двумя способами, но работает — третий»
Алан Джей Перлис
Условный оператор If
Всем привет, давно я не писал статей для сайта – все времени не было. Ну ничего, восполним упущенное. Усаживайся поудобнее, сегодня мы будем изучать условный оператор If .
Что же это за зверь такой – условный оператор? И зачем он вообще нужен? Без него же мы как-то решили первую задачку про периметр прямоугольника. Да, если бы все задачи, которые стояли перед программистами были такого плана, как задача про периметр, то он и не понадобился бы вовсе. Однако, на деле не все так просто.
Условный оператор If позволяет проверить некоторое условие и в зависимости от результатов проверки выполнить то или иное действие. Поэтому оператор If выступает в качестве средства ветвления вычислительного процесса. Приведу общую структуру записи условного оператора, а затем разберем на примере его работу.
В общем виде условный оператор в программе выглядит так:
If then else
где
If, then, else – зарезервированные слова (в переводе на русиш — если, то, иначе);
— произвольное выражение логического типа. Если оно дает значение true, оператор 1 выполняется, в противном случае выполняется оператор 2 (если он существует);
, — любые операторы языка Pascal
-
Работает вся эта штука по следующему принципу:
- Вычисляется условное выражение
- Если значение условия = true, то выполняется оператор 1, а оператор 2 пропускается.
- Если значение условия = false, то оператор 1 пропускается, а выполняется оператор 2.
Часть else оператора If может быть опущена за ненадобностью. Тогда, если значение условия = true, то оператор 1 выполняется, в противном случае условный оператор просто пропускается и программа идет дальше.
Наверно, не буду вас сейчас мучить вложенными условными операторами (это когда в условии одного оператора if находится другой оператор if, а в его условии может находится еще один, и т.д). Разберем это на следующем занятии, а пока решим задачку. Задачку я возьму из электронного задачника М.Э. Абрамяна. Кстати, этот задачник идет вместе с программой Pascal ABC, которую ты можешь скачать с этого сайта тут, если еще не сделал этого.
Условие задачи: «Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не изменять его. Вывести полученное число». У кого какие мысли по поводу решения этой задачи?
-
В общем план действий такой:
- Объявляем целочисленную переменную (типа integer);
- Присваиваем ей значение;
- Применяем условный оператор If, в условии которого будем проверять положительная ли переменная;
- Если наша переменная положительная, то прибавим к ней 1, если нет, то не будем ее трогать;
- Выведем переменную на экран.
Поехали! Для начала запишем название программы и объявим переменную, нам потребуется только одна переменная целого типа:
program positive; var A:integer; begin // Сделаем возможным ввод значения переменной с клавиатуры: writeln(‘Введите значение переменной’); read(A); // Применяем условный оператор: if A>0 then A:=A+1; // Выводим переменную на экран: write(‘A =’,A); end.
Собственно и вся задача))
На этом все. Жду ваших вопросов, кому что не понятно. Контакты для связи со мной находятся здесь. Удачи и до встречи на следующем уроке!
Источник: program4you.ru