Курсовая работа: курсовые

end;

procedure TForm1.Button1MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

begin

StatusBar1.SimpleText:='Вычислениеинтеграла';

end;

procedure TForm1.Button2MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

begin

StatusBar1.SimpleText:='Выходизпрограммы';

end;

end.

Пример 3.Для интеграла

при получены результаты:

Пример 1.Для интеграла

получены результаты:

Пример 4.Для интеграла

получены результаты:

Список литературы

Федорюк М.В. «Асимптотика: интегралы и ряды». М.:Наука, 1977.