Yang Tidak Bisa Dilakukan Turbo Pascal #1

Dalam kiriman saya sebelumnya, saya sudah membahas 3 jenis perulangan dalam pascal yaitu: for..do, while..do, dan repeat..until. Bahasa Pascal modern juga telah menyediakan jenis perulangan for..in yg sudah sangat umum di berbagai bahasa modern lainnya. Dalam bahasa lainnya, perulangan jenis ini juga disebut perulangan for..each. Perulangan for..in tersedia sejak Free Pascal v.2.4.2 (2010) dan Delphi 2006. Jika 3 perulangan Pascal klasik berbasis batas bilangan (for..do) dan syarat logika (while..do dan repeat..until), perulangan for..in tidak menggunakan keduanya. Perulangan for..in bekerja berdasarkan anggota dalam sebuah kumpulan data. Untuk tipe data dasar, perulangan for..in bisa digunakan pada tipe data rentang (range), string, deret (array), dan himpunan (set). Untuk tipe data lanjut, perulangan for..in juga bisa diterapkan dengan cara menyediakan fungsi pencacah (enumator) yg dibutuhkan.
Contoh kode for..in:

for ch in 'text' do write(c,', ');

Karena string adalah kumpulan karakter maka perulangan for..in pada string akan menghasilkan karakter penyusunnya. Dalam kode di atas, 'text' adalah string dan ch bertipe char akan menghasilkan keluaran t,e,x,t secara berurutan. Hal yg sama juga berlaku untuk tipe data lainnya. Contoh kode lainnya, berikut keluarannya, bisa dipelajari dalam kode program yg terlampir.
Selamat mencoba dan "Say NO to Turbo Pascal!" ?
Sumber: tulisan Pak Lebah di facebook group Pascal Indonesia
note: Tulisan berseri tentang apa yang tidak bisa dilakukan Turbo Pascal: - Seri 2 - Seri 3 - Seri 4