Система программирования Турбо Паскаль. Воробьева А.П - 35 стр.

UptoLike

ВУЗ: 

НГАСУ «Сибстрин» | Новосибирск

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

Рубрика: 

71
Выход из цикла
Тело цикла
(Т)
Д
(F)
Н
Условие
(
ЛВ
)
Оператор цикла repeat…until
Общий вид записи
repeat
<тело цикла>
;
until <логическое выражение>;
Работа оператора
Выполняется тело цикла, после чего вычисляется логическое
выражение, определяющее условие выхода из цикла. Если логи-
ческое выражение примет значение
TRUE, то цикл repeat…until
завершает свою работу.
Управляющая переменная, как и в случае оператора цикла
while, должна включаться в состав логического выражения и из-
меняться в теле цикла. Перед началом работы оператора также
производится начальная установка управляющей переменной.
Графическая интерпретация оператора
В блок-схемах оператору цикла repeat… until соответствует
структура
ЦИКЛ-ДО.
Выход из цикла
Тело цикла
(Т)
Д
(F)
Н
Условие (ЛВ)
72
Пример 1. Алгоритм табулирования функции с одной
переменной.
Вычислить таблицу значений функции:
22
ln
)(
ba
x
xy
+
=
для всех x, изменяющихся в интервале [–0.5,
2.5] с шагом ∆x = 0.1.
a, b – заданные вещественные числа.
В данной задаче переменная x является управляющей пере-
менной цикла.
Блок-схема Программа
Program TAB_1;
Var
a, b, x, y: real;
Begin
writeln(‘Введите’,
‘ исходные данные’);
read(a, b);
writeln(‘ x y(x)’);
x := –0.5;
while x <= 2.5 do
begin
y:= ln(abs(x))/(a∗a +b∗b);
writeln(x:8:1, y:8:1);
x:= x + 0.1;
end;
End.
К
Н
Заголовок
табли
ц
ы
Д
Н
a, b
x
:= –0.5
x
≤
2.5
22
ln
:
ba
x
y
+
=
x
, y
x
:=
x
+0.1
                                                                      Пример 1. Алгоритм табулирования функции с одной
                                                                 переменной.
                                                                      Вычислить таблицу значений функции:
                                   Н
               Условие                   Выход из цикла                                              ln x
                (ЛВ)               (F)                                                      y ( x) = 2
                                                                                                    a + b2
                Д    (Т)                                         для всех x, изменяющихся в интервале [–0.5, 2.5] с шагом ∆x = 0.1.
                                                                 a, b – заданные вещественные числа.
              Тело цикла
                                                                      В данной задаче переменная x является управляющей пере-
                                                                 менной цикла.
                Оператор цикла repeat…until
Общий вид записи                                                      Блок-схема                 Программа
                 repeat                                                                       Program TAB_1;
                                                                             Н                Var
                    <тело цикла>;
                 until <логическое выражение>;                                                   a, b, x, y: real;
Работа оператора                                                             a, b             Begin
    Выполняется тело цикла, после чего вычисляется логическое                                    writeln(‘Введите’,
выражение, определяющее условие выхода из цикла. Если логи-                                              ‘ исходные данные’);
                                                                       Заголовок                 read(a, b);
ческое выражение примет значение TRUE, то цикл repeat…until             таблицы
завершает свою работу.                                                                           writeln(‘ x       y(x)’);
    Управляющая переменная, как и в случае оператора цикла                                       x := –0.5;
while, должна включаться в состав логического выражения и из-         x := –0.5                  while x <= 2.5 do
меняться в теле цикла. Перед началом работы оператора также                                          begin
производится начальная установка управляющей переменной.                                                 y:= ln(abs(x))/(a∗a +b∗b);
Графическая интерпретация оператора                                                                      writeln(x:8:1, y:8:1);
                                                                        x ≤ 2.5                          x:= x + 0.1;
    В блок-схемах оператору цикла repeat… until соответствует                         Н
структура ЦИКЛ-ДО.                                                                                   end;
                                                                                  Д           End.
                                                                              ln x
                     Тело цикла                                       y :=
                                                                             a + b2
                                                                              2



        Н           Условие (ЛВ)          Д
                                                Выход из цикла               x, y
       (F)                               (Т)


                                                                       x := x+0.1         К

                              71                                                                 72

Страницы