Лабы и курсовая для АТП / Лабораторная работа 2

Лабораторная работа 2.

Тема: Табулирование.

Задание: Составить программу табулирования функции y=f(x) на отрезке [a,b] с шагом h:

где a=45; b=46,5; h=0,2.

Ход работы:

Блок-схема:

Код программы:

uses crt;

var a,b,h,y:real;

begin clrscr;

a:=45;

b:=46.5;

h:=0.2;

while a<=b do

begin

y:=sin(2*a)/(ln(88*a*(sqr(a)-3*a+2)));

writeln(y:2:5);

a:=a+h;

end;

readln;

end.

Результат работы программы: