Pandapotan Record

uses wincrt;
Type mahasiswa = record
Nama: string[15];
Nim:string[10];
IPK: real;
end;
Var Mhs: Mahasiswa;
type
tipesiswa=record
Nama: string[15];
end;
begin
write(‘nama : ‘);readln(mhs.nama);
write(‘nim : ‘);readln(mhs.nim);
write(‘IPK : ‘);readln(mhs.IPK);
writeln;
writeln(‘Nama anda:’,mhs.nama);
writeln(‘nim anda:’,mhs.nim);
writeln(‘IPK anda:’,mhs.IPK:4:2);

end.

Related posts:

1. Erika Record
2. Intan Record
3. Program yang Menggunakan Record
4. Aljan Array dan Record
5. Hendra Array & Record
6. Program Data Mahasiswa
7. ARRAY DAN RECORD
8. Contoh Program Record
9. Program Input Nilai Mahasiswa
10. Dani Record