aboutsummaryrefslogtreecommitdiff
path: root/tests/functional/74_itera_sqrt.sy
diff options
context:
space:
mode:
Diffstat (limited to 'tests/functional/74_itera_sqrt.sy')
-rw-r--r--tests/functional/74_itera_sqrt.sy27
1 files changed, 27 insertions, 0 deletions
diff --git a/tests/functional/74_itera_sqrt.sy b/tests/functional/74_itera_sqrt.sy
new file mode 100644
index 0000000..1b970d1
--- /dev/null
+++ b/tests/functional/74_itera_sqrt.sy
@@ -0,0 +1,27 @@
+int fsqrt(int a)
+{
+ int x0=0;
+ int x1;
+ x1=a/2;
+ while(x0-x1!=0)
+ {
+ x0=x1;
+ x1=(x0+a/x0);
+ x1=x1/2;
+ }
+
+ return x1;
+
+}
+
+int main()
+{
+ int a;
+ a=400;
+ int res;
+ res=fsqrt(a);
+ putint(res);
+ res = 10;
+ putch(res);
+ return 0;
+}