MENGHITUNG LUAS SEGITIGA DENGAN TURBO PASCAL
Program menghitung luas segitiga dengan turbo pascal:
Untuk membuat program menghitung luas segitiga ketikan scrib di bawah ini pada pascal :
program luas;
uses crt;
var a,t: integer;
L: real;
begin
clrscr;
write(‘Masukan Nilai Alas:’);readln (a);
write(‘Masukan Nilai Tingi:’);readln(t);
writeln;
L:=(a*t)/2;
writeln(‘Luas Segitiga adalah =’,L:6:2);
readln;
end.
Jika sudah maka gambarnya akan seperti di bawah ini :
Dan hasilnya akan seperti di bawah ini :
Selesai...
MENGHITUNG LUAS SEGITIGA DENGAN TURBO PASCAL
MENGHITUNG LUAS SEGITIGA DENGAN TURBO PASCAL
10out of 10 based on 25 ratings. 35 user reviews.
|
2 comments:
gabisa woii
Itu kenapa harus ada L:6:2. Maksudnya kenapa harus ada :6:2 nya?
Post a Comment