if условие then begin набор команд, которые выполняются если условие верно end else begin набор команд, которые выполняются если условие верно end;
НЕПОЛНАЯ ФОРМА
if условие then begin набор команд, которые выполняются если условие верно end;
if условие then
begin
набор команд, которые выполняются если условие верно
end
else
begin
набор команд, которые выполняются если условие верно
end;
НЕПОЛНАЯ ФОРМА
Если после then или else стоит только одна команда, то операторные скобки begin и end не обязательны.
Порядок выполнения оператора If
1. Вычисляется значение условия.
2. Если условие истинно, выполняются команды, следующим за словом then.
Если условие ложно, выполняются команды, следующим за словом else.
3. Управление передается командам, следующим за условным оператором.
ВНИМАНИЕ! Перед else точка с запятой не ставится.
Задание. Компьютер спрашивает, сколько книг ты читаешь в месяц? Если больше 2, то на экране появляется надпись «Хорошо!», иначе «Может, стоит читать больше?».
СОСТАВЛЕНИЕ ПРОГРАММ
Задание 1. Запустите PascalAbcNet
Задание 2. Набрать и выполнить программу из классной работы.
Задание 3. Компьютер спрашивает, сколько времени вы сидите в телефоне? Если меньше 30 минут, то на экране появляется надпись «Хорошо!», иначе «Уменьшай время!».
Задание 4. Вводится число. Надо определить, является ли оно трёхзначным.
Пример ввода вывода:
Ввод
119
Вывод
трёхзначное
Ввод
10
Вывод
нетрёхзначное
Задание 5. В магазине Вам надо заплатить N рублей. Вы подаете продавцу m купюр по k рублей. Определите сколько денег Вам надо добавить или сколько Вам должны дать сдачи, или возможно вы дали нужную сумму денег.
var k,m,n:...;
begin
writeln('Введите сумму покупки');
readln(n);
writeln('Сколько купюр дал человек');
...
end.
*3 детей играли в игру. Каждый в ходе игры набирал определённое количество баллов. Найдите максимум игроков.
