Pascal ABC

 

ГЛАВНАЯ
УСТАНОВКА
ОКНО ПРОГРАММЫ
ЛИНЕЙНЫЕ АЛГОРИТМЫ
ЧЕРТЁЖНИК
GraphABC
    РОБОТ
АЛГОРИТМЫ С ВЕТВЛЕНИЯМИ
АЛГОРИТМЫ С ПОВТОРЕНИЯМИ
ПРОЦЕДУРЫ И ФУНКЦИИ
ТЕСТЫ
ТВОРЧЕСКИЕ РАБОТЫ
ОЛИМПИАДНЫЕ ЗАДАНИЯ
 
 

 

 

 

АЛГОРИТМЫ С ВЕТВЛЕНИЯМИ ◊

Структура условного оператора Алгоритмы с ветвлениями.  Часть 1 Часть 2 Часть 3 Часть 4 Самостоятельная работа Часть 5 Часть 6 Операторные скобки. Составной оператор Оператор case Задачник

Конструкция ветвления- это часть алгоритма, в которой в зависимости от выполнения или невыполнения некоторого условия выполняется либо одна, либо другая последовательность действий.
    Алгоритм, в котором используется конструкция ветвления, называется алгоритмом с ветвлением.

Алгоритмы с ветвлениями. Часть 5

Контроль знаний

Тест: Алгоритмы с ветвлениями 5

  Пример. Проверить является ли введенное число трехзначным, и вывести четные цифры числа.

 

Этапы выполнения задания.

I.Определение исходных данных: переменная а (трехзначное число).

II. Определение результатов: переменные a1, a2, a3, в том случае если они четные или сообщение, что четных цифр нет.

III. Алгоритм решения задачи.

1.  Ввод исходных данных

2. Проверка является ли число трехзначным. Трехзначное число больше 99 и меньше 1000.

3 Если число трехзначное, то выделяем цифры числа и проверяем каждую из них на четность.

а) Для выделения первой цифры (переменная a1) трехзначного числа необходимо найти целую часть от деления числа на 100.

б) Для выделения второй цифры (переменная a2) трехзначного числа необходимо найти остаток от деления числа на 100 и от него найти целую часть при делении на 10.

в) Для определения последней цифры (переменная a3) трехзначного числа необходимо найти остаток от деления числа на 10.

г) Для проверки цифры на четность нужно проверить, равен ли нулю остаток от деления цифры на 2.

4. Вывод результата.

IV. Описание переменных:

Все переменные, определенные для решения задачи, имеют тип integer.

V. Программа:

Var a,a1,a2,a3: integer;

Begin

    Write(‘введите значение a=’);

    Readln(a);

    If (a>99) and (a<1000) then

    Begin

        a1:=a div 100;

        a2:=a mod 100 div 10;

        a3:=a mod 10;

        if a1 mod 2=0 then Writeln(‘цифра ’,a1,’ четная’);

        if a2 mod 2=0 then Writeln(‘цифра ’,a2,’ четная’);

        if a3 mod 2=0 then Writeln(‘цифра ’,a3, ‘ четная’);

        If (a1 mod 2=1) and (a2 mod 2=1) and (a3 mod 2=1) then

         Writeln(‘в числе нет четных цифр’);

    End

    Else  Writeln(‘число не является трехзначным’);

End.

Можешь загрузить!       Пример

VI. Тестирование программы:

1. Проверьте работу программы для следующих значений

Ввод a

Вывод

246

цифра 2 четная

цифра 4 четная

цифра 6 четная

103

цифра 0 четная

537

в числе нет четных цифр

25

число не является трехзначным

 

2. Поэкспериментируйте с программой вводя различные значения.

3. Заполните таблицу

 

a

Вывод

1

468

 

2

476

 

3

233

 

4

441

 

5

119

 

6

1111

 

 

4. Какие случаи расположения цифр в трехзначном числе не были рассмотрены? Предложите свои тесты на эти случаи.

5. Как по-другому можно вычислить значение второй цифры трехзначного числа?

6. Можно ли проверку цифр в числе записать следующим образом:

    if a1 mod 2=0 then

         Writeln(‘цифра ’,a1,’ четная’)

    else

         if a2 mod 2=0 then

                   Writeln(‘цифра ’,a2,’ четная’)

         else

                   if a3 mod 2=0 then

                            Writeln(‘цифра ’,a3, ‘ четная’)

                   else

                            Writeln(‘в числе нет четных цифр’);

Аргументируйте свой ответ.

  Проверка знаний  

Тест: Алгоритмы с ветвлениями 6

  Самостоятельная работа      

1. Дано натуральное число. Проверить, является ли число двузначным, и равна ли первая цифра числа второй.

2. Дано натуральное число. Проверить, является ли оно четырехзначным палиндромом (т. е. равна ли первая цифра четвертой, а вторая третьей).

3. Дано натуральное число. Проверить, является ли число шестизначным и выполняется ли следующее условие: сумма первой и четвертой цифр равна сумме второй и пятой и равна сумме третьей и шестой.

 

 

СЕРВИС 

Copyright © 2008 СОШ №2 им. Н.П. Массонова г.Свислочь © Синица А.А.