Цикл While

1. Для того, щоб оформити цикл while призначений службове слово while.

2. Після вказівки цього слова йде логічний діапазон циклу, тобто потрібно написати, при яких умовах цикл закінчиться. Це реалізується за допомогою відомих знаків порівняння і їхні взаємини зі змінними.

3. Після вказівки умови ставиться службове слово do.

1. Тепер іде саме тіло циклу. Тут пам’ятайте, що якщо в тілі циклу міститься один оператор (як у першому прикладі), то він указується без додаткових виділень. Якщо ж іде більше операторів, то вони все містяться у конструкцію begin-end.

Наприклад:Скласти блок-схему та програму обчислення функції:

1. Постановка задачі:

a, x – аргументи

z – результат

2. Математичний опис задачі:

x=0.2

доки x<3 виконати

вивід z

x=x+0.3

3. Тип обчислювального процесу – циклічний

4. Блок-схема:

5. Програма:

Program P4;

Var

a, x, z: real;

Begin

writeln (‘a’);

readln (a);

x:=0.2;

While x<3 do

begin

z:=sqr(x)+abs(a*exp(-x)-sqr(x)*x);

writeln (‘x=’,z);

x:=x+0.3;

end;

end.

Дата добавления: 2014-10-31