diff options
Diffstat (limited to 'check/recurs-proc.p')
-rw-r--r-- | check/recurs-proc.p | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/check/recurs-proc.p b/check/recurs-proc.p new file mode 100644 index 0000000..53c300b --- /dev/null +++ b/check/recurs-proc.p @@ -0,0 +1,10 @@ +program main ( input, output ); + var a: integer; + procedure bar (b: integer); + var test:integer; + begin + bar := bar(test) + end; +begin + bar(1) +end. |