Оператор цикла While с предусловием

Предусловие – это проверка условия.

Формат: While <условие> Do

<тело цикла>;

Работа оператора: Пока условие истинно, выполняется тело цикла. Как только условие стало ложным, управление передаётся оператору, следующему за While. В общем случае условие может быть выражение любого типа. Тело цикла может содержать одно и более операторов. Если количество операторов больше одного, то ставятся операторные скобки. Begin-End.

Схема

Оператор цикла Repeat с постусловием.

Формат: Repeat

< тело цикла >

Until < условие >

Работа оператора.

< тело цикла > выполняется до тех пор, пока условие ложно. Как только условие становится истинным происходит выход и цикла.

Схема

Между конструкциями Repeat-Until и While-Do существуют 3 отличия:

1. В конструкции While-Do проверка условия выхода выполняется в начале, а не в конце цикла. Поэтому, если условие не выполняется до начала выполнения цикла, то тело цикла игнорируется, а в операторе Repeat-Until проверка осуществляется после выполнения тела цикла, поэтому тело цикла в любом случае выполниться хотя бы один раз.

2. Выход конструкции While-Do осуществляется, когда условие ложно, а в Repeat-Until-когда условие истинно.

3. В теле оператора While нужно ставить операторные скобки при использовании нескольких операторов, а в операторе Repeat этого делать не надо.

Задание:

В1.

Вычислить значение суммы членов ряда:

для n=15, x=0.20

В2.

Вычислить значение суммы членов ряда:

для n=15, x=0.10

В3.

Вычислить значение суммы членов ряда:

для n=15, x=0.15

В4.

Вычислить значение суммы членов ряда:

для n=15, x=0.12

В5.

Вычислить значение суммы членов ряда:

для n=15, x=0.7

В6.

Вычислить значение суммы членов ряда:

для n=15

В7.

Вычислить значение суммы членов ряда:

для n=15, x=1.5

В8.

Вычислить значение суммы членов ряда:

для n=15

В9.

Вычислить значение суммы членов ряда:

для n=15, х=1,7

В10.

Вычислить значение суммы членов ряда:

с точностью

для n=15

В11.

Вычислить значение суммы членов ряда:

для n=15, x=0.75

В12.

Вычислить значение суммы членов ряда:

для n=15, x=0.62

В13.

Вычислить значение суммы членов ряда:

для n=15, x=0.20

В14.

Вычислить значение суммы членов ряда:

для n=15, x=0.3

В15.

Вычислить значение суммы членов ряда:

для n=15, x=0.25

В16.

Вычислить значение суммы членов ряда:

для n=15, x=0.1

В17.

Вычислить значение суммы членов ряда:

для n=15, x=0.1

В18.

Вычислить значение суммы членов ряда:

для n=15, x=0.2

В19.

Вычислить значение суммы членов ряда:

для n=15, x=0.2

В20.

Вычислить значение суммы членов ряда:

для n=15, x=0.3

Лабораторная работа №6

Тема: Составление, редактирование и отладка программ для вычисления суммы бесконечного ряда.

Цель: Овладеть навыками программирования вычислительных процессов вычисления суммы бесконечного ряда.

Теория:

Вычисление суммы бесконечного ряда.

При составлении программ при вычислении суммы бесконечного ряда количество повторений цикла заранее неизвестно, поэтому проверка окончания цикла осуществляется либо по очередному члену ряда, если значение его стремятся к нулю, либо по разности двух соседних членов, т.е. пока|Uk|<E, или

вычисление суммы продолжается. Как только |Uk|>ε,

вычисление суммы прекращается и за приближенное значение суммы берётся сумма первых k членов ряда.

Задача:

Program Example;

Var n:integer;

E, S, U, Z:real;

Begin

Writeln (‘введите Е’);

Readln(E);

S:=0; U:=1; N:=1; Z:=1;

While ABS(U)>E Do

Begin

z:=z*n; u:=1/z;

s:=s+u; n:=n+1;

End;

Writeln(‘S=’; S:6:3);

End.

Задание 1

В1.