diff options
Diffstat (limited to 'check/for.p')
-rw-r--r-- | check/for.p | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/check/for.p b/check/for.p new file mode 100644 index 0000000..694f9a5 --- /dev/null +++ b/check/for.p @@ -0,0 +1,16 @@ +program main ( input, output ); + + var a, b: integer; + var x,y,z: real; + var ai :array [1..10] of integer; +begin +{ TEST } + + a := 1; + x := 3.14; + b := a + 35; + (* test *) + for c := 0 to 10 do begin + for a:= 10 downto 0 do b := a - c + end +end. |