Программирование ветвлений на Паскаль. Повторение
презентация к уроку по информатике и икт (11 класс) на тему

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

Использованные интернет – ресурсы и литература
http://inf.reshuege.ru/test?theme=249
http://dok.opredelim.com/docs/index-68077.html
http://pas1.ru/condition
https://ru.wikipedia.org/wiki/%CE%EF%E5%F0%E0%F2%EE%F0_%E2%E5%F2%E2%EB%E5%ED%E8%FF
Оператор ветвления на Паскаль (условный оператор)
оператор, конструкция языка программирования, обеспечивающая выполнение определённой команды (набора команд) только при условии истинности некоторого логического выражения, либо выполнение одной из нескольких команд (наборов команд) в зависимости от значения некоторого выражения.

Ниже записана программа. Получив на вход число 
x
 , эта программа печатает два числа, 
L
 и 
M
. Укажите наибольшее из таких чисел 
x
, при вводе которых алгоритм печатает сначала 3, а потом 0.
var
x, L, M: integer;
begin
   
readln
(x);
    L:=0; M:=0;
    while x > 0 do begin
        L:= L + 1;
      if x mod 2 = 0 then
          M:= M + x mod 10;
        x:= x div 10;
    end;
   
writeln
(L); write(M);
end.
Программирование ветвлений на Паскале. Повторение
Ниже записана программа. Получив на вход число 
x
 , эта программа печатает два числа, 
L
 и 
M
. Укажите наибольшее из таких чисел 
x
, при вводе которых алгоритм печатает сначала 3, а потом 10.
var
x, L, M: integer;
begin
 
readln
(x);
    L:=0; M:=0;
    while x > 0 do begin
        L:=L+1;
        if M < x then begin
            M:= (x mod 10) * 2;
        end;
        x:= x div 10;
    end;
   
writeln
(L); write(M);
end.
Неполное ветвление
If
(логическое выражение)
then
(оператор 1)

Полное ветвление
If
(логическое выражение)
then
(оператор 1)
else (
оператор 2
)
Задачи для подготовки к ЕГЭ
Ниже записана программа. Получив на вход число 
x
 , эта программа печатает два числа, 
L
 и 
M
. Укажите наи­боль­шее из таких чисел 
x
, при вводе которых алгоритм печатает сначала 3, а потом 7.
begin
 
readln
(x);

L:=0; M:=0;
    while x > 0 do begin
        L:= L + 1;
        if x mod 2 = 0 then
            M:= M + (x mod 10) div 2;
        x:= x div 10;
    end;
   
writeln
(L); write(M);
end.
Решите задачи
Ветвление
Полное Неполное
Если переменная имеет значение меньше нуля, то ее значение изменяется (находится модуль числа). Если же значение переменной изначально больше нуля, то блок кода при операторе 
if
 вообще не выполняется, т.к. не соблюдено условие (
n
<0)