08 April 2012

Menampilkan Nama, Jenis Kelamin, Alamat Dan Umur menggunakan Record DiPascal

Kali ini saya bingung mau ngasih judulnya apa makanya judulnya sepanjang itu hehe.
Bagi yang blum tau Record itu apa baca ada dibawah ini hehe.
Record adalah kumpulan elemen-elemen data yang digabungkan menjadi satu kesatuan itu la record yang ku tau.


Silakan langsung dicoba saja scrip dabawah ini. ok hehe


Uses wincrt;
Type
    wisatawan = Record
    Nama : string[30];
    JenisKelamin : string[20];
    Alamat : string[20];
    Umur : integer
end;
Var
   wstw : wisatawan;
Begin
     ClrScr;
     write ('Nama :');readln (wstw.Nama);
     write ('Alamat :'); readln (wstw.Alamat);
     write ('Jenis Kelamin :'); readln (wstw.JenisKelamin);
     write ('Umur :'); readln (wstw.Umur);
     writeln;
     writeln ('Nama Anda :',wstw.Nama);
     writeln ('Alama Anda :', wstw.Alamat);
     writeln ('Jenis Kelamin Anda :',wstw.JenisKelamin);
     writeln ('Umur Anda :', wstw.Umur);
end.


Dibawah ini adalah output dari scrip yang diatas tapi harus diisi dulu nama, alamat, jenis kelamin, dan umur baru tampil yang dibawahnya.


Selamat mencoba semoga bermanfaat.

sumber : Tugas kuliah ane hehe

0 komentar:

Post a Comment

Terima kasih sudah memberi komentar,
komentar anda sangat berguna untuk menjadikan blog ane lebih baik lagi..
jangan lupa berkunjung kembali..