RosettaCodeData/Task/Variables/PascalABC.NET/variables-6.pas

var i: integer;
begin
  for var i:=1 to 10 do // Error!
    Print(i)
end;