Contoh Pengulangan Pada Turbo Pascal

Contoh 1 :
Uses Wincrt;
var
   i, j : integer;
begin
   for i := 1 to 5 do
   begin
      for j := i to 5 do
         write(j, ' ');
      writeln;
   end;
end.

bila program diatas dijalankan, hasilnya :

1 2 3 4 5
2 3 4 5
3 4 5
4 5
5

Turbo Pascal dengan Rumus IF dan Else

Contoh sederhana Turbo Pascal dengan Rumus IF dan Else :

Input :

Nama Barang (NB)

Banyak Barang (BB)

Harga Barang (HB)

Rumus :

Jumlah Bayar (JB) = BB * HB

Jika Jumlah Bayar > 100.000 Maka diskon 10 %

Jika Jumlah Bayar < 100.000 Maka Tidak Dapat Diskon

Bayar Akhir (BA)  = JB-(10%*JB)

Contoh Sederhana Turbo Pascal

Bagi yang ingi menjadi seorang programmer,  bahasa pascal salah satu yang harus dikuasai. hal ini karena  Pascal adalah salah satu bahasa pemrograman yang paling sederhana dan merupakan bahasa yang dasar.

TPW adalah program yang digunakan dalam penggunaan bahasa pemrograman PASCAL pada komputer dengan operating sistem adalah windows. Turbo Pascal sendiri merupakan versi yang populer dalam PASCAL. PASCAL sudah menjadi bahasa standar dalam dunia pendidikan komputer.

Beberepa program yang berhubungan dengan kehidupan kita dapat dikonsepkan dengan algoritma dan pascal ini. Algoritma merupakan cara menyelesaikan suatu masalah dengan urutan langkah logis.  Secara umum algoritma adalah sejumlah langkah komputasi yang mengubah masukkan (input) menjadi keluaran (output) yang benar.

Berikut ini beberapa contoh sederhana Turbo Pascal. Contoh  Program sederhana ini adalah tugas saya di semester 1,  matakuliah Algoritma Pemrograman di STMIK ADHI GUNA PALU.

Selamat mencoba, smoga berhasil...