Program P29;
type T1=integer;
     T2=-150..150;
     T3=1..5;
var i : T1;
    j : T2;
    k : T3;
    m : 1..5;
    n : (Unu, Doi, Trei, Patru, Cinci);
begin
 { ... calcule ce utilizează }
 { variabilele în studiu ... }
 writeln('Sfîrşit')
end.