RUMUS LUAS SEGITIGA DI PASCAL

Posted by : SENDIRYAN
Rabu, 25 September 2013

Memperoleh sedikit ilmu, dan langsung diamalkan akan lebih baik dan disini saya sedikit menuangkan yang baru saja saya ketahui tentang perumusan bahasa pemrograman pascal.
Dan saya mendapatkan Rumus ini dari Pembimbing saya semasa Saya melaksanakan PKL.. :)


Rumus Menghitung Luas Segitiga;
uses crt;
var a,t,ls :integer;
begin
clrscr;
write (‘alas=’); readln(a);
write (‘tinggi=’); readln(t);
ls :=a*t;
writeln (‘Luas Segitiga Adalah=’, ls);
readln;
end.

0 komentar:

Blog Archive

Copyright © 2012 IT Support SMK TRITECH INFORMATIKA | Another Theme | Designed by Johanes DJ