PASCAL: AN INTRODUCTION

LES ENREGISTREMENTS DANS LES ENREGISTREMENTS
Les champs des enregistrements peuvent aussi être des enregistrements. Soit un enregistrement contenant un enregistrement comme champ. Ce champ contenant lui même deux champs date et time, s'appelle date_time:


	type  date = RECORD
	                day, month, year : integer
	             END;

	      time = RECORD
	                hours, minutes, seconds : integer
	             END;

	      date_time = RECORD
	                     sdate : date;
	                     stime : time
	                  END;

On a alors défini un enregistrement dont les éléments sont des enregistrement déclarés précédemment. L'instruction


	var   today  : date_time;

declare une variable de travail today, de type date_time. Les instructions


	today.sdate.day     :=   11;
	today.sdate.month   :=    2;
	today.sdate.year    := 1985;
	today.stime.hours   :=    3;
	today.stime.minutes :=    3;
	today.stime.seconds :=   33;

donnent aux éléments sdate de l'enregistrement today la valeur correspondant au 11 février 1985. L'élément stime de l'enregistrement est initialisé à trois heures, trois minutes et trente-trois secondes.