Wednesday, 12 January 2011

Rumus Turbo Paskal Untuk Menghitung Luas Segitiga

program Rumus_menghitung_luas_segitiga;
uses wincrt;
var
a,t:integer;
luas_segitiga:real;
begin
clrscr;
write('alas : ');readln(a);
write('tinggi : ');readln(t);
luas_segitiga:=(a*t)/2;
writeln('luas segitiga : ',luas_segitiga:0:2);
readln;
end
.

14 comments :

roby said...

ternyata sederhana kalau sudah melihat n langsung kopi paste, hehhehehe :D

Hendra said...

iya,,emang mudah copi paste..

yoyon12 said...

mantap

ulah55 said...

Coba dong ditulis pengertianya.. dan digunakan di sofware mana :D
tapi kereeeeeeen :D

Guvee said...

Pelajaran SD dulu.... Jaman sekarang tinggal masukin ke software..

Hendra said...

itu bisa dimasukkan di software "Turbo Paskal". saya memosting kemarin itu karena ada permintaan dari mas roby

Hendra said...

terima kasih atas kunjungannya. salam kenal dari hendra.

yoyon12 said...

mantap bro,,baru 1 postingan udah ranking 7jutaan di google..langsung blogwalking bro,,

Hatori said...

tambah lgy postingannya... plendz
aq tunggu lch ..

Eddys said...

Wuieh, Thank's Banget ! :D Bloggernya Kereens.

muhammad nugroho said...

agan2 ... saia mau nanya nhe ... deretan terakhir writeln('luas segitiga : ',luas_segitiga:0:2); ... o:2 ny itu apa ???

Anonymous said...

heheh

Anonymous said...

kanjut

Unknown said...

heheh

Post a Comment