Advertisement
Guest User

Untitled

a guest
Apr 23rd, 2019
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.23 KB | None | 0 0
  1. program ArrayTest;
  2.  
  3. {$APPTYPE CONSOLE}
  4.  
  5. uses
  6. SysUtils;
  7.  
  8. var
  9. testArray : array[0..1] of integer;
  10.  
  11. begin
  12.  
  13. testArray[0] := 12;
  14. testArray[1] := 14;
  15.  
  16. Writeln(testArray[0], ' ', testArray[1]);
  17. Readln;
  18.  
  19. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement