Menghitung Rumus Segitiga dengan Pascal

program segitiga1;
uses crt;

var a,t:integer;
L:real;
const k=0.5;

begin
clrscr;

a:=3;
t:=3;
l:=k*(a*t);

writeln(l);
readln;


end.

Tweet

Jangan sampai ketinggalan postingan-postingan terbaik dari Gadget Mainstream. Berlangganan melalui email sekarang juga:

Atau sobat juga bisa follow Gadget Mainstream dengan mengklik tombol di bawah ini:

Artikel keren lainnya:

• Analisis Struktur Data pada Pascal
• Perintah pada Ubuntu
• Aplikasi Teknik Multimedia
• Aplikasi Teknik Multimedia
• Aplikasi Teknik Multimedia

Ditulis oleh Gadget Mainstream pada tanggal Senin, 05 Januari 2015