mudahnnya belajar pascal
mulailah dengan program sederhana contoh segitiga
uses wincrt;
var
a,t,s,k,l:real;
begin
writeln(' program segitiga ');
write('masukkan alas :');readln(a);
write('masukkan tinggi:');readln(t);
s:=sqrt(a*a + t*t);
k:=a+t+s;
l:=0.5*a*t;
writeln('sisi miring :',s);
writeln('keliling :',k);
writeln('luas :',l);
end.
Langganan:
Postingan (Atom)