aboutsummaryrefslogtreecommitdiff
path: root/Testing/General/test-5.p
diff options
context:
space:
mode:
authorTucker Evans <tuckerevans24@gmail.com>2019-09-30 16:46:18 -0400
committerTucker Evans <tuckerevans24@gmail.com>2019-09-30 16:46:18 -0400
commit8e354d0b3d76eac27fe2c533db275e21f983b8dd (patch)
tree84bc3966eeb12ff0053d0bbf9e3783806c747f42 /Testing/General/test-5.p
parent4509eb5ac0a2150986933495cf0a3ae9a1d24e53 (diff)
Add more of Tino's tests
Diffstat (limited to 'Testing/General/test-5.p')
-rw-r--r--Testing/General/test-5.p12
1 files changed, 12 insertions, 0 deletions
diff --git a/Testing/General/test-5.p b/Testing/General/test-5.p
new file mode 100644
index 0000000..b71a6b4
--- /dev/null
+++ b/Testing/General/test-5.p
@@ -0,0 +1,12 @@
+program main( input, output );
+ var x, y: integer;
+ function foo( x, y: integer ): integer;
+ begin
+ foo := x * x - y * y
+ end;
+begin
+ read(x);
+ y := foo( x+1, x-1 );
+ write(y)
+end.
+