Cara Menghitung Sisi Miring Segitiga dengan Program Pascal

Pengertian Pascal

     Pascal yaitu bahasa pemrograman yang pertama kali dibuat oleh Profesor Niklaus Wirth salah seorang anggota International Federation of Information Processing (IFIP) 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.

    Berikut adalah bagaimana caranya menghitung 'Sisi Miring' pada Segitiga dengan menggunakan 'alas' dan 'tinggi' segitiga tersebut :

Buka program pascal bisa "Turbo Pascal" atau "Free Pascal" (saya menggunakan "Free Pascal").

Masukan script di pascal      
 program Phytagoras ;   
 uses    crt;    
 var     a,t,m:real;    
 begin   clrscr; 
         write ('alas:');
         readln(a);
         write ('tinggi:');
         readln(t);
         m:=sqrt((a*a)+(t*t));
         write   ('phytagoras:'.m:3:2);
         readln;
 end.

Seperti gambar di bawah ini :

 

Jika sudah selesai di ketik maka, pilih menu "Run > Run" atau tekan "Ctrl+F9"

Jika ada kesalahan pada penulisan maka akan muncul pesan seperti :

 

Ingat untuk menggunakan kurung "( )" bukan "< >" dalam penulisan script...

Jika sudah benar maka program akan berjalan sesuai perintah...

Begitulah cara membuat program untuk mencari sisi miring pada segitiga dalam 

"Program Pascal"