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

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

if  условие then

                     begin

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

                    end

                 else

                  begin

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

                 end;

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

if  условие then

                     begin

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

                    end;

               

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

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

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

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

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

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

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

Задание. Компьютер спрашивает, сколько  книг ты читаешь в месяц?  Если больше 2, то на экране появляется надпись «Хорошо!», иначе «Может, стоит читать больше?». 

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

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

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

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

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

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

var  k,m,n:...;

begin

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

  readln(n);

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

  ...

end.

*3 детей играли в игру. Каждый в ходе игры набирал определённое количество баллов. Найдите максимум игроков.

ИГРАЕМ