PROGRAM PASCAL UNTUK MENGHITUNG SISI MIRING SEGITIGA

Apa itu pascal??
Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971. Dengan mengambil nama dari matematikawan Perancis, Blaise Pascal, yang pertama kali menciptakan mesin penghitung, Profesor Niklaus Wirth membuat bahasa Pascal ini sebagai alat bantu untuk mengajarkan konsep pemrograman komputer kepada mahasiswanya.

nah pada kali ini saya akan memposting bagaimana cara menghitung sisi miring segitiga dengan program pascal. dimana cara menghitung sisi miring yaitu akar dari alas pangkat dua ditambah tinggi pangkat dua.
langkah-langkahnya yaitu:

1. buka program pascal bisa turbo pascal atau free pascal (saya menggunakan free pascal).
2. masukan script di pascal
    
    PROGRAM pythagoras;
    USES crt;
    VAR a,t,c:real;
    BEGIN
    clrscr;
    write('alas segitiga(a)=');
    readln(a);
    write('tinggi segitiga(t)=');
    readln(t);
    c:=sqrt((a*a)+(t*t));
    writeln('nilai sisi miring (c)=',c:2:2);
    readln(c);
    end.


   kalau sudah anda masukan maka seperti gambar berikut

selanjutnya tekan ALT+F9 apabila sukses maka seperti gambar dibawah ini

untuk contoh kita masukan nilai alasnya(a)=6,nilai tingginya(t)=8, maka hitunglah sisi miringnya(c)?? 

maka sisi miringnya(c)=10