buatlah program hitung luas segitiga menggunakan bahasa pemograman pascal rumus Lsegitiga=0,5xaxt
TI
Homersat
Pertanyaan
buatlah program hitung luas segitiga menggunakan bahasa pemograman pascal rumus
Lsegitiga=0,5xaxt
Lsegitiga=0,5xaxt
1 Jawaban
-
1. Jawaban owenizedd
program luas;
uses crt;
var
a,t: integer;
Lsegitiga: real;
begin
clrscr;
write(‘Masukan Nilai Alas:’);
readln (a);
write(‘Masukan Nilai Tingi:’);
readln(t);
writeln(‘ ‘);
Lsegitiga:=0.5*(a*t);
writeln(‘Luas Segitiga adalah =’,L:6:2);
readln;
end.