ngitung pake rumus matematika

Luas Lingkaran, akar kuadrat, pangkat dua, wuuahh… gak aneh lagi tuh.., pasti rumus matematika. Kali ini kita coba yuk ngitung rumus matematika pake program PASCAL. Tapi sebelumnya baca dulu deh penjelasan berikut :

PI adalah suatu fungsi yang disediakan Turbo Pascal untuk mendapatkan nilai phi yaitu 3.14159…..

SQR adalah fungsi untuk menghitung nilai kuadrat dari suatu bilangan. Contoh: SQR(4), maka hasilnya adalah 4.

SQRT adalah fungsi untuk menghitung nilai akar kuadrat dari suatu bilangan. Contoh: SQRT(36), maka hasilnya adalah 6.

Jelaskan skarang kita akan bahas penggunaan sintak PI, SQR, dan SQRT. Langsung aja … tanpa basa basi, coba deh cotoh – contoh program di bawah ini !

Contoh01

1.Program Lingkaran;

2.Uses Crt;

3.Var r,L,K : Real;

4.Begin

5. Clrscr;

6. Write(’Masukan jari-jari lingkaran (cm) : ‘); Readln(r);

7. L := pi * r * r;

8. K := 2 * pi * r;

9. Writeln;

10. Writeln(’Luas lingkaran : ‘,L:10:2,’ cm2′);

11. Writeln(’Keliling lingkaran : ‘,K:10:2,’ cm ‘);

12.End.

Contoh02

1. Program Lingkaran;

2. Uses Crt;

3. Var a,b,d : Real;

4. c : Integer;

5. Begin

6. Clrscr;

7. a := 5.3;

8. b := sqr(a);

9. c := 25;

10. d := sqrt(c);

11. Writeln;

12. Writeln(’kuadrat a : ‘, b:6:0);

13. Writeln(’akar kuadrat c : ‘, d:6:0);

14.End.

Untuk latihan coba kamu buat program untuk menghitung panjang sis miring segitiga siku – siku ! Rumus segitiga siku – siku : c2 = a2 + b2.

Kriteria input dan outpunya sebagai berikut:

Input : a dan b

Output : Panjang sisi miring

Petunjuk: Pakailah fungsi SQR dan SQRT.

sumber : http://dzulcyber.blogspot.com