source:
liacs/coco/tests/varia/writes.p0@
236
Last change on this file since 236 was 2, checked in by , 15 years ago | |
---|---|
File size: 128 bytes |
Line | |
---|---|
1 | program a; |
2 | |
3 | procedure foo(bar: integer; baz: real); |
4 | |
5 | begin |
6 | writeinteger(bar); |
7 | writereal(baz) |
8 | end; |
9 | |
10 | begin |
11 | foo(3, 3.5) |
12 | end. |
Note:
See TracBrowser
for help on using the repository browser.