Program untuk membuat luas dan keliling segitiga (versi Trigonometri)

Jumpa lagi NAWAK-NAWAK SEMUA
pada kesempatan kali ini AYAS kan coba membuat program untuk luas dan keliling segitiga sembarang yang diketahui salah satu sudutnya.

mengapa AYAS katakan versi trigonometri, karena berhubungan dengan aturan trigonometri.
  
LISTING PROGRAM :


program luas_dan_keliling_segitiga;
uses crt;
var
   L, K, a, b, c, alfa: real;
begin
clrscr;
       write ('masukkan nilai alfa: ');
       readln(alfa);
       write ('masukkan nilai a: ');
       readln(a);
       write ('masukkan nilai b: ');
       readln(b);
       write ('masukkan nilai c: ');
       readln(c);
       L := 1/2*a*b*(sin(alfa*pi/180));
       K := a + b + c;
       writeln ('jadi nilai Luas= ',L:6:1);
       write ('dan kelilingnya= ',K:6:1);
       writeln;
       readkey;
end.

Mudah dan simple bukan maka dari itu, belajarlah lebih giat untuk membuat program-program yang lebih bagus lagi, sekalian belajar dengan menggunakan turbo c++ atau pun delphi.

makasih sudah berkunjung di MUDA (ilMUDuniA)