Оператор циклу з постумовою repeat until

Оператор циклу з постумовою. При такому записіциклу оператори будуть виконуватися доти, доки умова, що стоїть після слова until, не виконається.

Синтаксична діаграма наведена на рис. 25:

Рис. 25

Семантика:

Виконується оператор циклу.

1. Перевірка умови:

- якщо false => подальше виконання оператора;

- якщо true => оператор циклу не виконується.

Приклад. Написати програму, яка серед N заданих чисел знаходить мінімальне, максимальне, суму та середнє число.

Program Statistica;

var i,n,min,max,sum:integer;

begin

write('Введіть кількість чисел');

readln(n);

writeln('Введіть чергове число');

readln(x);

min:=x;

max:=-x;

sum:=x;

i:=0;

if n>1 then

repeat

begin

i:=i+1;

writeln('Введіть чергове число');

readln(x);

sum:=sum+x;

if max<x then max:=x;

if min>x then min:=x;

end;

until i=n;

writeln('Мінімум = ',min);

writeln('Мaксимум = ', max);

writeln('Cумa = ', sum);

writeln('Середнє значення = ', sum/n:5:2);

end.

Завдання:

Скласти блок-схему алгоритму і програму на мові Turbo Pascal, зберегти файл, налагодити програму, обчислити суму членів ряду табл. 25 за допомогою оператора з післямовою (постумовою). На екран дисплея вивести отриманий результат.

Таблиця 25

Варіант	Розрахункові формули	Варіант	Розрахункові формули

ПИТАННЯ НА САМОСТІЙНЕ ОПРАЦЮВАННЯ

Типи даних алгоритмічної мови Turbo Pascal

Мета заняття: Закріпити у студентів поняття про структуру типів даних мови програмування Turbo Pascal та їх використання у прикладних завданнях.

Навчальні питання:

1. Типи даних мови Паскаль.

2. Масиви.

Методичні рекомендації:

Дата добавления: 2015-05-24