aboutsummaryrefslogtreecommitdiff
path: root/Testing/General/test-5.p
diff options
context:
space:
mode:
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.
+