diff options
Diffstat (limited to 'Testing/General/test-0.p')
-rw-r--r-- | Testing/General/test-0.p | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/Testing/General/test-0.p b/Testing/General/test-0.p new file mode 100644 index 0000000..838d264 --- /dev/null +++ b/Testing/General/test-0.p @@ -0,0 +1,27 @@ +program main(input); + var a: integer; + var b: array[1 .. 10] of real; + var x: real; + function foo(x: integer; y: real):integer; + begin + foo := foo(x-1) + 1; + x := 13 + end; +begin + if ( x > 3.14 and x < 0.0 ) then + x := 1.0 + else + x := 0.0 +end. + + + + + + + + + + + + |