tw0815.pp 91 B

12345678910
  1. {$mode delphi}
  2. function T: Integer;
  3. begin
  4. for Result:=0 to 10 do ;
  5. end;
  6. begin
  7. T;
  8. end.