Информатика 10-11. Книга 2. Практика алгоритмизации и программирования. Шауцукова Л.З. - 56 стр.

UptoLike

ВУЗ: 

ВСГУТУ | Улан-Удэ

Составители: 

Рубрика: 

Алгоритмы, реализуемые с помощью вложенных циклов типа ПОКА
Схема вложенных циклов типа пока:
нц пока <условие 1>
тело внешнего цикла
. . . . . . .
нц пока <условие 2>
тело внутренного цикла
. . . . . .
кц
. . . . . . .
кц
Пример 5.1. Определить, имеется ли в заданном целочисленном массиве A(N) хотя
бы одна пара совпадающих по значению чисел.
Система тестов
Данные Результат
Номер
теста
Проверяемый
случай
N Массив А Otvet
1
2
Имеется
Не имеется
4
3
(1,3,2,3)
(1,2,3)
"Есть совпадающие числа"
"Нет совпадающих чисел"
Школьный АЯ
алг Равенство(арг цел N, арг цел
таб A[1:N],
рез лит
Otvet)
нач цел i, j, лит Flag
i:=1; Flag:="Нет"
нц пока (i<=N–1) и (Flag="Нет")
| цикл по первому числу из
пары
j:=i+1
нц пока (j<=N) и (Flag="Нет")
| цикл по второму числу из
пары
если A[i]=A[j] | проверка
равенства чисел
то Flag:="Да"
иначе j:=j+1
все
кц
i:=i+1
кц
если Flag="Да"
Блок-схема (фрагмент) 
           Алгоритмы, реализуемые с помощью вложенных циклов типа ПОКА



Схема вложенных циклов типа пока:

                      нц пока <условие 1>
                        тело внешнего цикла
                        . . . . . . .
                             нц пока <условие 2>
                                тело внутренного цикла
                               . . . . . .
                             кц
                        . . . . . . .
                      кц

 Пример 5.1. Определить, имеется ли в заданном целочисленном массиве A(N) хотя
                 бы одна пара совпадающих по значению чисел.

                                  Система тестов

  Номер       Проверяемый         Данные                   Результат
   теста         случай       N     Массив А                 Otvet
    1           Имеется       4      (1,3,2,3)      "Есть совпадающие числа"
    2          Не имеется     3       (1,2,3)       "Нет совпадающих чисел"

Школьный АЯ
алг Равенство(арг цел N, арг цел
таб A[1:N],
                         рез лит
Otvet)
нач цел i, j, лит Flag
  i:=1; Flag:="Нет"
  нц пока (i<=N–1) и (Flag="Нет")
     | цикл по первому числу из
пары
     j:=i+1
     нц пока (j<=N) и (Flag="Нет")                 Блок-схема (фрагмент)
         | цикл по второму числу из
пары
        если A[i]=A[j] | проверка
равенства чисел
          то Flag:="Да"
          иначе j:=j+1
        все
     кц
     i:=i+1
  кц
  если Flag="Да"

Страницы