tugas 3

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.

Previous
Next Post »
Thanks for your comment