Схема алгоритма с использованием цикла For ... Do

Для организации цикла For необходимо сначала определить число

повторений цикла - n. Это можно сделать с помощью формулы: n=(b-a)/h+1. При программировании необходимо учитывать тип переменных, участвующих в выражении. При вычислении значения n в правой части формулы получается результат вещественного типа, а слева стоит переменная целого типа, поэтому необходимо применить операцию округления полученного значения n до целого значения получаемого в результате операции деления. Для этого можно использовать стандартную функцию Round.

нет

да

Текст программы

{Лабораторная работа }

{Программирование циклов с использованием оператора FOR}

{Студенты гр. ....}

Uses crt;

Var x,y,A,B,H:real;

n,i: integer;

BEGIN Clrscr;

Writeln(' Введите A B H'); read(A,B,H);

n:= Round((B-A)/H)+1;

x:=A;

For i:=1 To n Do

begin

if (6*x*x-x*x*x)<=0 then

Writeln('При x= ',x:5:3,' под знаком логарифма недопустимое значение')

else

begin

y:= Exp(1.0/3.0*Ln(Abs(6*x*x-x*x*x)));

Writeln(' x= ',x:2:3,' y= ',y:2:3);

end;

x:=x+H;

end; { Конец For}

END.

Варианты самостоятельных заданий

1. Y = xSinx/Cosx; A = -1.6, B = 1.6, H = 0.2

2. Y = tgx² + ctgx²; A = -2, B = 2, H=0.5

3. Y = Ln(x² -9)/x; A = -6, B = 6, H = 1

4. Y = xLn(Cosx); A = -3, B = 3, H = 0.3

5. Y = tgx/x; A = -2, B = 2, H = 0.2

6. Y = Sinx/(x-5); A = -6, B = 6, H = 0.5

7. Y = x/(1-Cosx); A = -4, B = 4, H = 0.5

8. Y = 1/xtg(x/2); A = -3, B = 3, H = 0.5

9. Y = 1/(x² -3); A = -4, B = 4, H = 0.5

10. Y = 1/Ln(x²/8); A = -3, B = 3, H = 0.6

11. Y = 1/x ctg(x/3); A = -4, B = 4 , H = 0.5

12. Y = Ln(16-x²)/x e^x; A = -6, B = 6, H = 0.5

13. Y = x tg x/ Lnx; A = -3, B = 3, H = 0.5

14. Y = x²Ln|x|/Sinx; A = -2, B = 2, H = 0.2

15. Y = x/Sinx+ Ln(x² - 4); A = - 6, B = 6, H = 0.5

16. Y = x²Cosx/Ln(x²-1); A = -2, B = 2, H = 0.1

17. Y = xSinx/Ln(x²-9); A = -5, B = 5, H = 0.5

18. Y = x²/(Cosx+Ln(x²-1)); A = -2, B = 2, H = 0.2

19. Y = (x²+ tgx)/Ln(x²-4); A = -4, B = 4, H = 0.8

20. Y = (x²- Cosx)/xLn(x²-1); A = -2, B = 2, H = 0.2