RosettaCodeData/Task/Integer-sequence/DWScript/integer-sequence.dw

var i: Integer;

for i:=1 to High(i) do
   PrintLn(i);