Program yang Menggunakan Record
Apr 15, 2009 1 Comment
Contoh program sederhana data mahasiswa
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | uses wincrt; type mahasiswa = record nrp: string; nama: string; alamat:string; end. var mhs : mahasiswa; begin write(’Inputkan nama’);readln(mhs.nama); write(’Inputkan nrp’);readln(mhs.nrp); write(’Inputkan alamat’);readln(mhs.alamat); {dengan begitu kita sudah mempunyai sebuah entitas mahasiswa lengkap dengan nilai atributnya untuk menampilkan datanya} writeln(mhs.nama,mhs.nrp,mhs.alamat); end. |
klo mau buat 3 buah data nama trus di panggil satu” pakai angka gmna yaa??