X hits on this document

213 views

0 shares

0 downloads

0 comments

24 / 62

24

Variant Records – Pascal Example

type resident = record

 initials: array [1..2] of char;

 case married: boolean of

   true: (

     husband_income: integer;

     wife_income: integer;

   );

   false: (

     income: real;

   );

 id_number: integer;

end;

wife_income (4 bytes)

husband_income (4 bytes)

married (1 byte)

initials (2 bytes)

married (1 byte)

initials (2 bytes)

income (4 bytes)

Case is TRUE

Case is FALSE

Document info
Document views213
Page views213
Page last viewedTue Jan 17 07:00:57 UTC 2017
Pages62
Paragraphs993
Words3163

Comments