Program Sisi Miring

assalamualaikum wr.wb
sore ini saya akan memberikan latihan pw maaf maksudnya PD  ( Pemprograman Dasar) :D
kali ini saya akan memberikan code untuk menghitung sisi miring.
silahkan simak dengan baik
1. pertama buka aplikasi Turbo Pascal versi windows kalo yang belum punya silahkan download dijongol maksudnya disini.
2. silahkan buka aplikasinya
3. kemuadian buka baru dengan cara klik file lalu New

4. silahkan copy paste dibawah ini ( cara paste di turbo pascal menggunakan edit lalu paste. tidak bisa menggunakan kompinasi ctrl+v)

program sisi_miring;

uses wincrt;

var

 a,b,c:real;

begin

 clrscr;

 write('masukan sisi A=');readln(a);

 write('masukan sisiB=');readln(b);

 c:=sqrt (sqr(a))+(sqr(b));

 writeln('panjang sisi miring=',c:2:2);

end.

5. silahkan coba buka programnya dengan cara pilih run lalu run atau bisa menggunakan kompinasi keyboard ctrl+F9

6. jika berhasil anda bisa menyimpannya.

nb: sebelum menggunakan program ini sebaiknya anda mencoba untuk mengetes apakan hasilnya benar atau tidak. karena bisa jadi code yang dimasukan berbeda dengan rumus.. :D

selamat mencoba