Условный оператор (IF..THEN..ELSE). Паскаль для начинающих.

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

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

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

Условие бывает:

  1. Неполное
  2. Полное

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

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

Неполное условие Паскаль

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

ЕСЛИ УСЛОВИЕ ИСТИННО, ТО ВЫПОЛНЯЕТСЯ ДЕЙСТВИЕ, ИНАЧЕ НИЧЕГО НЕ ПРОИСХОДИТ

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

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

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

Что такое условие?

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

Например:

var a:integer;
begin
readln(a);
if a=7 then writeln('Привет!');
end.

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


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

var a:integer;
begin
readln(a);
if a=7 then writeln('Привет!'); writeln('До встречи');
end.

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

Привет!
До встречи

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

До встречи

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

writeln('До встречи');

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

var a:integer;
begin
readln(a);
if a=7 then writeln('Привет!'); writeln('До встречи'); // условие подсвечено голубым цветом
end.

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

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

Получим:

var a:integer;
begin
readln(a);
if a=7 then begin                                            writeln('Привет!');
                writeln('До встречи');
            end;

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

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

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

  • Если мы используем and, то составное условие будет истинно, когда все простые условия  истинны.
  • Если мы используем or, то составное условие будет истинно, когда хотя бы одно простое условие будет истинно.

Например:

a>7    и    a<15  на языке паскаль будет записываться

(a>7) and (a<15)

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

Или:

(a=7) or (a>15)

Составное условие будет истинно, если: либо a=7, либо a>17.

Задача:

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

Решение

var a, b, c:integer;
begin
readln(a);
readln(b);
readln(c);
if (a>b) and (a>c) then writeln('число ', a, ' максимальное');
if (b>a) and (b>c) then writeln('число ', b, ' максимальное');
if (c>a) and (c>b) then writeln('число ', c, ' максимальное');
end.

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

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

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

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

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

  • Если условие истинно, то выполняется действие, стоящее после слова Then.
  • Если условие ложно, то выполняется действие, стоящее после слова Else.

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

if условие then 
begin
      действие;
      действие;
...............
end
            else
begin
       действие;
       действие;
................
end;

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

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

  1. Сумма покупки составляет а рублей. Если а больше 1000 рублей, то предоставляется скидка 15%. Вывести на экран сумму покупки с учетом скидки либо сообщение о том, что скидка не предоставляется.
  2. Известны площади круга и квадрата. Определить:
    • уместится ли круг в квадрате
    • уместится ли квадрат в круге
  3. Определить, является ли число а делителем числа b
  4. Проверить, принадлежит ли число введенное с клавиатуры, интервалу (-5;3).
  5. Дано двузначное число. Определить:
    • входит ли в него цифра 3
    • входит ли в него цифра а
  6. Определить, является ли треугольник со сторонами a, b, c равнобедренным
  7. Даны три различных числа. Определить, какое из них (первое, второе или третье)
    • самое большое
    • самое маленькое
    • является средним

(список задач будет пополняться)


1 Звезда2 Звезды3 Звезды4 Звезды5 Звезд (4 голос, значение: 3,25 из 5)
Loading...Loading...
Вы можете оставить комментарий, или ссылку на Ваш сайт.
Комментарии:

Оставить комментарий


семь − = 1

[sape count=3]