Belajar membuat Program Menghitung Luas Segitiga

Belajar membuat Program Menghitung Luas Segitiga

Program berikut ini mempergunakan rumus matematika untuk menghitung luas sebuah segitiga ( 0.5 X alas X tinggi ). Dari rumus tersebut kita bisa membuat sebuah program sederhana.
Langka-langka untuk membuat programnya adalah sebagai berikut :
1. Buatlah sebuah Form seperti yang terlihat pada gambar 1 dibawa ini.

Gambar 1. Form Tampilan


2. Kemudian Doble Click pada tombol Proses dan ketikan Code dibawah ini pada bidang Code editor seperti yang terlihat pada gambar 2 .

procedure TForm1.Button1Click(Sender: TObject);
var A,T,L:real;
begin
A:=STRTOFLOAT(EDIT1.TEXT);
T:=STRTOFLOAT(EDIT2.TEXT);
L:=0.5*A*T;
EDIT3.Text:=FLOATTOSTR(L);
end;

Gambar 2. Bidang Code Editor

3. Setelah selesai memasuakan code tersebut pada bidang code editor, kemudia anda jalankan program tersebut dengan cara clik tombol Run yang terdapat pada panel bagian kiri atas yang berwana hijau. Atau dengan menekan f9 pada keyboard.

Penulis : Riza Agustian ~ Sebuah blog yang menyediakan berbagai macam informasi

Artikel Belajar membuat Program Menghitung Luas Segitiga ini dipublish oleh Riza Agustian pada hari Sabtu, 23 Juni 2012. Semoga artikel ini dapat bermanfaat.Terimakasih atas kunjungan Anda silahkan tinggalkan komentar.sudah ada 0 komentar: di postingan Belajar membuat Program Menghitung Luas Segitiga
 

0 komentar:

Posting Komentar