Progam Delphi adalah sebuah bahasa program komputer yang masih banyak diminati atau masih sering di pakai dalam suatu pembuatan program oleh seorang Programmer. Program Delphi adalah program sebelum program VB yang sekarang banyak di pakai, karena lebih mudah menggunakannya. menurut saya, setiap Aplikasi program memiliki karakterisktik kelebihan yang dimiliki masing-masing aplikasi pemograman tergantung anda yang mempelajarinya atau memakainya. Jadi kali ini saya akan memberikan sebuah program delphi yang sederhana yaitu Program Luas segitiga yang dimana Sisinya telah di ketahui atau bisa langsung kita inputkan sendiri. Mungkin ini terlihat sederhana tapi saya mengharapkan ini dapat membantu anda yang masih pemula atau masih belajar yang namanya Program Delphi. Disini saya akan memberikan juga coding yang sangat sederhana untuk program ini dengan rumus matematika tentang Luas segitiga.
Contoh Program saat dijalankan :
Cara yang sangat sederhana sekali bagi anda yang lagi belajar yang namanya pemograman Delphi. Codingnya pun sangat singkat jadi kalau tidak sabar lagi untuk melihat codingnya langsung saja ke TKP dan mulailah untuk mengkopy dan memastekannya.
Coding Program Luas Segitiga Delphi :
procedure TForm1.bthitungClick(Sender: TObject);
var
s: real;
a,b,c: integer;
luas : real;
begin
a:= strtoint(edit1.Text);
b:= strtoint(edit2.Text);
c:=strtoint(edit3.Text);
s:=(a+b+c)/2;
luas := sqrt(s*(s-a)*(s-b)*(s-c));
edit4.Text:=format('%.2f',[luas]) ;
end;
end.
Itulah Program sederhana Luas Segitiga menggunakan Delphi. Semoga Artikel ini dapat membuat anda bisa mengenal yang namanya Pemograman Delphi. Jika ada pertanyaan tinggal komenter di kolom komentar. Ayo Kunjungi juga Program Hitung Gaji.
kl ingin copas ... jangan lupa cantumin sumbernya ya ,,,
ReplyDelete