Оператор ветвления

ПРЕЗЕНТАЦИЯ К УРОКУ

if  условие then

                     begin

              набор команд, которые выполняются если условие верно

                    end

                 else

                  begin

           набор команд, которые выполняются если условие верно

                 end;

НЕПОЛНАЯ ФОРМА

if  условие then

                     begin

              набор команд, которые выполняются если условие верно

                    end;

               

Если после then или else стоит только одна команда, то операторные скобки begin и end не обязательны.

Порядок выполнения оператора If

1. Вычисляется значение условия.

2. Если условие истинно, выполняются команды, следующим за словом then.

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

3. Управление передается командам, следующим за условным оператором.

ВНИМАНИЕ! Перед else точка с запятой не ставится.

СОСТАВЛЕНИЕ ПРОГРАММ

Задание 1. Запустите PascalAbcNet

Задание 2. Набрать и выполнить программу из классной работы.

Задание 3.  У вас спрашивают, сколько  времени вы сидите в телефоне?  Если до 30 минут, то на экране появляется надпись «Хорошо!», иначе «Уменьшай время!». 

Задание 4. Вводится число. Надо определить, является ли оно трёхзначным.

Пример ввода- вывода:

Ввод

119

Вывод

трёхзначное

Ввод

10

Вывод

нетрёхзначное

Ввод

5000

Вывод

нетрёхзначное

Задание 5. В магазине вам надо заплатить s рублей. Вы подаете продавцу k купюр по r рублей. Определите сколько денег вам надо добавить или сколько  должны дать сдачи, или возможно вы дали нужную сумму денег.

var  s,k,r:...;

begin

  writeln('Введите сумму покупки');

  readln(s);

  writeln('Сколько купюр дал человек'); 

  ...

end.

Подсказка. Можно использовать три неполных если - рассмотреть три варианта. 

if ...then  ..сдачи не надо;

if ...then  ..сдача нужна;

if ...then  ..мало;

ИГРАЕМ