Menghitung jumlah byte dari suatu argumen.
Contoh:
Type
Data=record
Nama:string[15];
Telp:string[7];
End;
Var p:^data;
Begin
Getmem(p,sizeof(data));
Writeln(‘Ukuran Record tersebut adalh: ‘,sizeof(data),’Byte’);
Freemem(p,sizeof(data));
Readln;
End.
Kembali ke Contoh
Program Turbo Pacal
