1.Aplikasi Pengurut Bintang
Aplikasi Pengurut Bintang adalah aplikasi untuk mengurutkan dari satu bintang,dua bintang,tiga bintang,sampai jumlah bintang terakhir sesuai dengan jumlah yang kalian inginkan.
Masih belum mengerti ? Mungkin bisa lihat gambar diatas.
Skrip yang digunakan cukup sederhana kok,silahkan dipelajari..
1 2 3 4 5 6 7 8 9 10 11 12 | program bintang;uses wincrt; {Saya pakai Turbo Pascal for Windows 1.5}var a,b,c:integer; {Variabel a,b,c saya set ke integer}beginwrite('Masukkan Jumlah Bilangan..'); readln(c);for a:=1 to c dobeginfor b:=1 to a dowrite('*');writeln;end;end. |
2.Aplikasi Penentu Segitiga
Aplikasi ini digunakan untuk menentukan Jenis Segitiga yang ingin diketahui,dilihat dari panjang sisi A,sisi B,dan sisi C nya.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | program penentu_segitiga;uses wincrt;var a,b,c,i,j:integer;beginwrite('Masukkan Panjang Sisi A..'); readln(a);write('Masukkan Panjang Sisi B..'); readln(b);write('Masukkan Panjang Sisi C..'); readln(c);i:=sqr(c);j:=sqr(a) + sqr(b);if (i<j) thenwriteln('Segitiga Lancip')else if (i=j) thenwriteln('Segitiga Siku Siku')elsewriteln ('Segitiga Tumpul')end. |
3.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;beginwrite('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. |
Dan beberapa yang bisa dibuat adalah
1. Menghitung tanggal/hari
2. game anak-anak
DLL
Inilah beberapa aplikasi sederhana yang bisa dibuat oleh pascal ,Sebenarnya masih banyak aplikasi dengan menggunakan pascal tetapi saya hanya memberikan beberapa saja dari sumber-sumber dibawah.
Sumber: https://msatrio.wordpress.com/2011/05/29/beberapa-aplikasi-dengan-pascal/
https://www.duniailkom.com/tutorial-belajar-pascal-pengertian-bahasa-pemrograman-pascal/



Out Of Topic Show Konversi KodeHide Konversi Kode Show EmoticonHide Emoticon