source:
trunk/Example.pas
| Last change on this file was 33, checked in by , 14 years ago | |
|---|---|
| File size: 147 bytes | |
| Line | |
|---|---|
| 1 | program Test; |
| 2 | var |
| 3 | a: Byte; |
| 4 | B: Byte; |
| 5 | begin |
| 6 | A := 'a' + (11 + 1 + 2 * 3 + 2) xor 10 / 2; |
| 7 | B := 20; |
| 8 | while A < 10 do A := A + 1; |
| 9 | |
| 10 | end; |
Note:
See TracBrowser
for help on using the repository browser.
