MENGHITUNG LUAS JAJAR GENJANG DENGAN PASCAL

MENGHITUNG LUAS JAJAR GENJANG DENGAN PASCAL

Nah  berikut adalah cara menghitung luas jajar genjang
dengan menggunakan pascal

1.Programnya 

Program MencariLuasJajarGenjang;
Uses crt;
Var
   L:integer;
   a:integer;
   t:integer;
Begin
     clrscr;
     writeln('Program Mencari Luas Jajar Genjang');
     write('Input Nilai a=');readln(a);
     write('Input Nilai t=');readln(t);
     L:=a*t;
     writeln('Nilai Mencari Luas Jajar Genjang=',L);
     readln;

end.

2.Pascal




3.Hasilnya













Komentar

Postingan populer dari blog ini

MENGHITUNG VOLUME TABUNG DENGAN PASCAL

TABEL DISTRIBUSI FREKUENSI DATA JAMAK, NILAI MEAN, ,MEDIAN, MODUS, QUARTIL DAN DESIL

MENCARI LUAS LAYANG LAYANG DENGAN MENGGUNAKAN KALIMAT DESKRIPTIF DAN PSEUDO-CODE