MediaWiki:Sandbox

Es handelt sich hierbei um einen reinen Test. Keine Kommentare bitte, keine Veränderungen und vor allem: Kein Einsatz außerhalb dieses Beitrages!

procedure HelloWorld;
var x,z: Integer;
begin;
  {String Testing
   Testing String}
  WriteLn('Hello World!');

  // Do number test
  WriteLn(10,20,30);

  for x:=0 to 200 do Inc(z);
end;