Question

Elaborați un program care afișează pe ecran numerele de ordine ale valorilor tipului de date: etaje=(unu, doi, trei)

Answer 1

Răspuns:

type etaje=(unu, doi, trei);

var x:etaje;

begin

 x:=unu;

 writeln(ord(x));

 x:=doi;

 writeln(ord(x));

 x:=trei;

 writeln(ord(x));

end.

Explicație: