ЦИКЛИЧЕСКИЕ ПРОЦЕССЫ (продолжение)
2. ЦИКЛ С ПОСТУСЛОВИЕМ или ЦИКЛ "ДО"
Сначала выполняется тело цикла, затем проверяется условие. Выход из цикла
осуществляется, когда УСЛОВИЕ СТАНЕТ ИСТИННЫМ , если условие ЛОЖНО, то
цикл повторяется.
REPEAT repeat - (рипид) - повторять
тело цикла until - (антил) - ДО тех пор пока
UNTIL условие;
Проверка условия производится после выполнения тела цикла, что делает
применение цикла "ПОКА" более предпочтительным, когда требуется пропустить
цикл вообще.
Вычислить 
для любого Х, с проверкой корректности ввода.
Program Func; Uses crt;
var x,y: real;
Begin
Repeat
ClrScr;
write('X='); readln(x);
until (x<>0);
y:=1/x;
writeln('x=',x,' y=',y);
readkey;
End.
З А Д А Н И Я:
1. Вычислить сумму ряда: 0.6, 0.7, 0.8, 0.9.
2. Вывести таблицу функции y=cos(x) ,
где x изменяется в градусах от 10 до 45 с шагом 5.
3. Определить, что больше сумма ряда: 1.1 , 1.3 , ... , 93.1
или произведение: 5*7*...*11.
4. Вычислить значение функции y=1/(x-5), на отрезке от 0 до 10
с шагом 1 и с проверкой отсутствия деления на 0.
