SRI LESTARI 201712043
Reguler B Semester 2
Menurut anda,aplikasi apa saja yang bisa di buat oleh pascal ?
Aplikasi Segitiga Pythagoras
Pernah belajar Teorema Pythagoras ? Itu lho rumus untuk mencari sisi miring sebuah segitiga siku siku.
Tertarik membuat aplikasinya ? Sangat mudah kok,apalagi jika menggunakan bahasa Pascal,berikut sintaksnya :
1 2 3 4 5 6 7 8 9 | program pythagoras; uses wincrt; var a,b,c: integer ; begin write ( 'Masukkan Panjang Sisi A..' ); readln(a); write ( 'Masukkan Panjang Sisi B..' ); readln(b); c:=a*a+b*b {Bisa juga dengan 'c:=sqr(a) + sqr(b);'} writeln ( 'Panjang Sisi C adalah..' ,sqrt(c)); end . |
Inilah beberapa aplikasi yang sudah saya buat secara cuma cuma di hari Minggu,bila tergolong sederhana,harap dimaklumi karena Desain Aplikasi Pascal tidak sebagus aplikasi Visual Basic.
Out Of Topic Show Konversi KodeHide Konversi Kode Show EmoticonHide Emoticon