Program untuk membuat suatu integral

Aslmkm ikhwan sekalian, jumpa lagi dgn awak di blog ini, awak kan coba membuat suatu program yang menggunakan integral..

Sebenarnya, mudah sih buat nya, jika ikhwan sekalian mau belajar lebih giat lagi,...pada kesempatan kali ini awak akan membuat suatu program yang ada integranya... awak akan coba mengambil satu contoh integral yaitu:
integral (du/A^2-U^2).
cukup sulitkan, tapi sebenarnya mudah kalau mau belajar..oke langsung saja yah..nih dia programnya:


program integral;
uses crt;
var
   intgrlX, mutX, a, u, C: real;
{integrlX adalah integral (du/(a^2-u^2))}
{mutX adalah abs((u+a)/(u-a))}
{C adalah suatu konstanta}
begin
clrscr;
       write ('masukkan nilai a: ');
       readln(a);
       write ('maskkan nilai u: ');
       readln(u);
       mutX := abs((u+a)/(u-a));
       intgrlX := (1/2*a)*ln(mutX)+C;
       write ('Jadi nilainya adalah ',intgrlX:6:1);
readln;
end.

Oke,,bagaimana mudah bukan...maka dari itu belajar terus...oke kalau ada keluhan seputar pascal silahkan tinggalkan komentar saja...key..nanti awak kan coba bantu..sekain dulu ikhwan sekalian see you..wassalam..