Что такое then в паскале

Условные операторы

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

Чаще всего в качестве условного оператора в языках программирования используется конструкция if-else или ее сокращенный вариант if. Также существует оператор выбора case, который имеет более специфичное применение.

Оператор if-else

Когда выполнение основной ветки программы доходит до условного оператора if-else, то в зависимости от результата логического выражения в его заголовке выполняются разные блоки кода. Если логическое выражение вернуло true, то выполняется один блок (в Паскале начинается со слова then), если false – то другой (начинается со слова else). После выполнения одного из вложенных блоков кода, ход программы возвращается в основную ветку. Другой вложенный блок не выполняется.

Например, программа должна определять, ввел пользователь четное или нечетное число, и выводить на экран сообщение. Тогда программный код на языке Pascal может быть таким:

Бывают неполные формы условных операторов. В таком случае вложенный в if блок кода выполняется только в случая true логическом выражении заголовка. В случае false выполнение программы сразу передается в основной блок. Понятно, что ветка else в таком случае отсутствует.

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

Источник

Что такое then в паскале

Главное меню

Популярные статьи

Цель: дать понятие об условном операторе, блок-схемах, изображающих такие операторы; ввести понятие и формах записи вещественного типа real. Учить на частных примерах составлять блок-схемы и программы; вводить и выполнять программы, используя компиляторы BPW или Turbo Pascal.

Использовать программы: Barland Pascal for Windows (BPW) или Barland Pascal, или Turbo Pascal

Многие представляют ЭВМ как чисто вычислительную машину, что является заблуждением. ЭВМ способна, подобно человеку, принимать решения.
Вот некоторые простые решения, которые принимает человек в зависимости от условия.

Если пойдет дождь, тогда надо взять зонтик,
иначе, зонтик не брать.
Если в комнате темно, тогда надо включить свет.

2. Блок-схемы, изображающие условные операторы

Рис. 5

Для более ясного понимания использования этих операторов, рассмотрим следующий пример.
Пример 1. Составить программу, после выполнения которой меньшее из двух неравных чисел будет увеличено вдвое, а большее оставлено без изменения.

Блок-схема

Рис. 6
Программа

Program Problem2; < Увеличения меньшего из двух целых чисел вдвое >
uses WinCrt;
var
a, b, c : integer;
begin
write(«Введите первое целое число «); readln(a);
write(«Введите второе целое число «); readln(b);
if a = 0) and (y >= 0).

Program Problem7;
uses WinCrt;
var
x, y, R : real;
begin
write(«Введите координаты точки «); readln(x, y);
write(«Введите радиус окружности «); readln(R);
if (x*x + y*y = 0) and (y >= 0)
then writeln(«Да»)
else writeln(«Нет»)
end.

Пример 8. Составьте программы определения большего из трех действительных чисел a, b и c.

Рис. 13
Задание 4

1. Используя блок-схему составить и выполнить программу. Изменить программу так, чтобы в случае равных чисел, она выдавала «Числа равны».
2. Даны три числа a, b, c. Написать программу, в результате которой числа удвоятся, если и числа будут заменены на их абсолютные величины в прочих случаях.

8. Вычисление значений функции

Program Problem9;
uses WinCrt;
var
a, b, c, y : real;
begin
write(«Введите значения a, b, c «); readln(a, b, c);
y := a*b + c*sin(a*b);
writeln(«Значение функции равно y = «, y:6:6)
end.

Пример 10. Составить программу вычисления значения функции:

Program Problem10;
uses WinCrt;
var
x, y : real;
begin
write(«Введите значение аргумента x = «); readln(x);
if x 0) and (x = 1 then y := 1/(2*sqrt(x))
else y := 1/(4*exp(ln(abs(x))/4));
writeln(«Значение функции равно y = «, y:6:6)
end.

Пример 12. Составить программу для вычисления значений функции, заданной графиком:

Program Problem12;
uses WinCrt;
var
x, y : real;
begin
write(«Введите значение аргумента x = «); readln(x);
if abs(x)>= 3 then y := 3
else y := abs(x);
writeln(«Значение функции равно y = «, y:6:6)
end.

1. Вычислить значение функции по формуле:
2. Точка плоскости задана своими координатами x, y. Написать программу, при выполнении которой определяется, принадлежит ли данная точка плоской фигуре, являющейся кольцом с центром в точке (0, 0), с внутренним радиусом 3 и с наружным радиусом 4.

3. Написать программу, при выполнении которой выводится 1, если данное число x принадлежит отрезку [a, b], где a и b заданные числа, и выводится 0 в противоположной ситуации.
4. Даны положительные числа x, y, z. Выяснить, существует ли треугольник с длинами сторон x, y, z?
5. Определить, верно ли, что при делении целого неотрицательного числа a на целое положительное число b получается заданный остаток r или s.
6. Составить программу решения биквадратного уравнения

Автор: Тишин Владимир Иванович

Источник

Pascal-Паскаль

Программирование. Условные операторы Pascal-Паскаль

Программирование. Условные операторы Pascal-Паскаль

Условные операторы Pascal-Паскаль

Условные операторы позволяют выбирать для выполнения те или иные части программы в зависимости от некоторых условий. Если, например, в программе используются вещественные переменные x и z, и на каком-то этапе решения задачи требуется вычислить z=max(x, y), то желаемый результат получается в результате выполнения либо оператора присваивания z:=x, либо оператора присваивания z:=y. Поскольку значения переменных x и y заранее неизвестны, а определяются в процессе вычислений, то в программе необходимо предусмотреть оба эти оператора присваивания. Однако на самом деле должен выполниться один из них. Поэтому в программе должно содержаться указание о том, в каком случае надо выбирать для исполнения тот или иной оператор присваивания.

Это указание естественно сформулировать с использованием отношения x>y. Если это отношение при текущих значениях x и y справедливо (принимает значение true), то для исполнения должен выбираться оператор z:=x; в противном случае для исполнения должен выбираться оператор z:=y (при x=y безразлично, какой оператор выполнять, так что выполнение оператора z:=y в этом случае даст правильный результат).

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

Здесь if (если), then (то) и else (иначе) являются служебными словами, В – логическое выражение, а S1 и S2 – операторы.

Выполнение такого условного оператора в Паскале сводится к выполнению одного из входящих в него операторов S1 или S2: если заданное в операторе условие выполняется (логическое выражение В принимает значение true), то выполняется оператор S1, в противном случае выполняется оператор S2.

Алгоритм решения упомянутой выше задачи вычисления z= max( x, y) можно задать в виде условного оператора Паскаля

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

В подобных ситуациях удобна сокращенная форма записи условного оператора в Паскале:

Правило выполнения сокращенного условного оператора Паскаля достаточно очевидно: если значение логического выражения В есть true, то выполняется оператор S; в противном случае никаких иных действий не производится.

В языке программирования Паскаль в условном операторе между then и else, а также после else по синтаксису может стоять только один оператор. Если же при выполнении (или невыполнении) заданного условия надо выполнить некоторую последовательность действий, то их надо объединить в единый, составной оператор, т.е. заключить эту последовательность действий в операторные скобки begin. end (это важно!). Если, например, при x of

[else ] end

Здесь case, of, else, end – зарезервированные слова (случай, из, иначе, конец);

— произвольные операторы Паскаля.

Например, составим программу, которая по номеру дня недели выводит на экран его название:

Пример программы с использованием Case of

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

Любому из операторов списка выбора может предшествовать не одна, а несколько констант выбора, разделенных запятыми. Например, следующая программа при вводе одного из символов ‘ y’ или ‘ Y’ выведет на экран «Да», а при вводе ‘ n’ или ‘ N’ – слово «Нет».

Пример программы с использованием Case of с несколькими переменными

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

Программирование

Исходники Pascal (127)

Справочник

Справочник по паскалю: директивы, функции, процедуры, операторы и модули по алфавиту

Источник

Что такое then в паскале

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

Алгоритмическая конструкция УСЛОВИЕ используется в тех случаях, когда перед нами стоит выбор: сделать так или иначе.

Неполное условие

Блок-схема неполного условия выглядит следующим образом:

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

IF условие THEN действие;

Если условие, стоящее после IF истинно, то выполняется действие, стоящее после слова THEN.

Условие — это выражение, которое может быть либо истинным, либо ложным. Условие обязательно содержит логические операторы , =, =, <> (не равно).

Например:

Если введенное значение переменной a равно 7, то на экране мы увидим слово Привет! Если не равно — то на экран ничего выводится не будет.

Рассмотрим другой пример:

Что мы увидим на экране, введя число 7? Увидим:

Что мы увидим на экране, введя число 10?

Почему так? Почему До встречи выводится на экран в любом случае? Команда

не относится к конструкции If-Then

Как сделать так, чтобы оба действия относились к конструкции If-Then?

Необходимо заключить эти действия в так называемые операторные скобки: begin… end;

end.
Теперь, если мы введем число 10, то на экране ничего не увидим.

Составное (сложное) условие

Иногда приходится использовать сложное условие. Для его составления используются логические союзы: and или or.

Например:

a>7 и a 17.

Используя конструкцию If-Then, найти максимальное среди трех введенных чисел.

Решение

Полное условие

Блок-схема полного условия выглядит так:

Полное условие. Блок-схема

IF условие THEN действие_1 ELSE действие_2;

(перед else точка с запятой не ставится)

Задачи для самостоятельного выполнения:

Источник

Что такое then в паскале

В Паскале разветвляющиеся алгоритмы позволяет реализовать условный оператор. Условный оператор позволяет проверить некоторое логическое выражение и в зависимости от результатов проверки выполнить то или иное действие.
Структура условного оператора в полной форме имеет следующий вид:

IF (логическое выражение) THEN (оператор1) ELSE (оператор2);

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

В условном операторе после then, а также после else по синтаксису может стоять только один оператор. Если же при выполнении (или невыполнении)логического выражения надо выполнить не одно действие, а несколько, то их надо объединить в единый, составной оператор, т.е. заключить эту последовательность действий в операторные скобки.
Составной оператор имеет вид:

Пример 2:
Даны два числа, найти наибольшее.

Упражнения «Программирование разветвляющихся алгоритмов»

1. Записать условие, которое является истинным, когда

· каждое из чисел X и Y нечетное;

· только одно из чисел X и Y меньше 20;

· хотя бы одно из чисел X и Y равно нулю;

2. Записать условие, которое является истинным, когда

· каждое из чисел А и В больше 100;

· только одно из чисел А и В четное;

· хотя бы одно из чисел А и В положительно;

· каждое из чисел А, В, С кратно трем;

· только одно из чисел А, В и С меньше 50;

· хотя бы одно из чисел А, В, С отрицательно.

3. Записать условие, которое является истинным, когда

1. целое А кратно двум или трем;

2. целое А не кратно трем и оканчивается нулем.

4. Записать условие, которое является истинным, когда

1. целое N кратно пяти или семи;

2. целое N кратно четырем и не оканчивается нулем.

5. Определите значение переменной С после выполнения фрагмента программы:

if А>В then С:=А+В else С:=А-В;

а) 100 b) 5 с) 105 d)95

6. Укажите правильную запись на языке Паскаль выражения, записанного на русском языке Х>=0 и Х>=3,25 и У

Источник