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