mencari luas segitiga menggunakan program pascal

uses wincrt;

const
t = 5;

var
   a : integer;
   l : real;

begin
     write ('masukkan nilai alas = ');
     readln (a);
     l :=0.5*a*t;         
     writeln ('luas segitiga = ',l:0: 2);
end.

Like THIS :
Share this article to: Facebook Twitter Google+ Linkedin Technorati Digg

Jika Anda menyukai Artikel di blog ini, Silahkan berlangganan gratis via email, dengan begitu Anda akan mendapat kiriman artikel setiap ada artikel yang terbit.


Belum ada komentar untuk "mencari luas segitiga menggunakan program pascal"

Proudly by UIN SUSKA RIAU