uni/inf2100/pascal2100/examples/test (SFConflict martid0311@gmail.com 2015-12-29-23-12-42).pas

Program Test;

const
    myText = 'Hello!';
    myNumber = 543;
    myError = myNumber;

type
    myType = integer;
    myEnum = (test1, test2, test3); 
    mySecondEnum = (heya);
    myRange = 10..20;
    myArray = array[myRange] of myType;

var
    myInteger : myType;
    myTest : myEnum;

procedure test;
begin
end;

Begin
End.