Программа паскаль если то

Оператор условия предназначен для выбора действия в зависимости от заданного условия. Общая форма условия выглядит следующим образом:

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

    Работает вся эта штука по следующему принципу:
  1. Вычисляется условное выражение
  2. Если значение условия = true, то выполняется оператор 1, а оператор 2 пропускается.
  3. Если значение условия = false, то оператор 1 пропускается, а выполняется оператор 2.

Часть else оператора If может быть опущена за ненадобностью. Тогда, если значение условия = true, то оператор 1 выполняется, в противном случае условный оператор просто пропускается и программа идет дальше.

Наверно, не буду вас сейчас мучить вложенными условными операторами (это когда в условии одного оператора if находится другой оператор if, а в его условии может находится еще один, и т.д). Разберем это на следующем занятии, а пока решим задачку. Задачку я возьму из электронного задачника М.Э. Абрамяна. Кстати, этот задачник идет вместе с программой Pascal ABC, которую ты можешь скачать с этого сайта тут, если еще не сделал этого.

Условие задачи: «Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не изменять его. Вывести полученное число». У кого какие мысли по поводу решения этой задачи?

    В общем план действий такой:
  1. Объявляем целочисленную переменную (типа integer);
  2. Присваиваем ей значение;
  3. Применяем условный оператор If, в условии которого будем проверять положительная ли переменная;
  4. Если наша переменная положительная, то прибавим к ней 1, если нет, то не будем ее трогать;
  5. Выведем переменную на экран.
Читайте также:
К какому из направлений по мнению авторов программы са фи дансе относятся нестандартные упражнения

Поехали! Для начала запишем название программы и объявим переменную, нам потребуется только одна переменная целого типа:

program positive; var A:integer; begin // Сделаем возможным ввод значения переменной с клавиатуры: writeln(‘Введите значение переменной’); read(A); // Применяем условный оператор: if A>0 then A:=A+1; // Выводим переменную на экран: write(‘A =’,A); end.

Собственно и вся задача))

На этом все. Жду ваших вопросов, кому что не понятно. Контакты для связи со мной находятся здесь. Удачи и до встречи на следующем уроке!

Источник: program4you.ru

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru