Archive for the ‘ Pascal ’ Category

Program Menghitung Luas dan Keliling Lingkaran

Script untuk membuat program luas dan keliling lingkaran

==============================

Program luas_dan_keliling_lingkaran;

Uses crt;

Var r : integer; luas,keliling : real;

Const phi = 3.14;

Begin

Write(‘masukkan jari jari lingkaran : ‘); readln(r);

Luas:=phi*(r*r);

keliling:=phi*2*r;

Writeln(‘luas lingkaran = ‘,luas);

writeln(‘keliling lingkaran = ‘,keliling);

End.

Program Menghitung Sederhana

Kali ini saya akan menampilkan script pada pascal yang berguna untuk melakukan perhitungan sederhana

==============================

Program menghitung;

Uses crt;

Var a,b,c : integer;

Begin

Write(‘masukkan nilai a = ‘);

Readln(a);

Write(‘masukkan nilai b = ‘);

Readln(b);

c:=a+b;

writeln(‘nilai c = ‘,c);

readln;

end.

==============================

Pascal

Pascal adalah bahasa pemrograman tingkat tinggi yang dikembangkan oleh Niklaus Wirth di Zurich pada akhir 1960-an hingga awal 1970-an. Pascal merupakan bahasa pemrograman yang terstruktur, sehingga sering digunakan sebagai sarana awal untuk mempelajari teknik pemrograman komputer. Versi bahasa Pascal yang banyak dipakai adalah Turbo Pascal buatan Borland International yang bekerja di lingkungan sistem operasi DOS. Belakangan, Pascal juga dikembangkan sebagai bahasa pemrograman visual di lingkungan sistem operasi Windows dengan nama Delphi.