summaryrefslogtreecommitdiff
path: root/Basic_Engineering_Mathematics_by_John_Bird/CH22/EX22.1
diff options
context:
space:
mode:
Diffstat (limited to 'Basic_Engineering_Mathematics_by_John_Bird/CH22/EX22.1')
-rw-r--r--Basic_Engineering_Mathematics_by_John_Bird/CH22/EX22.1/Ex22_1.R14
1 files changed, 14 insertions, 0 deletions
diff --git a/Basic_Engineering_Mathematics_by_John_Bird/CH22/EX22.1/Ex22_1.R b/Basic_Engineering_Mathematics_by_John_Bird/CH22/EX22.1/Ex22_1.R
new file mode 100644
index 00000000..dcb7c0df
--- /dev/null
+++ b/Basic_Engineering_Mathematics_by_John_Bird/CH22/EX22.1/Ex22_1.R
@@ -0,0 +1,14 @@
+#page no. 221
+#problem 1
+#formula used: pythagoras theorem
+
+hypo = function(base,perp)
+{
+ return(sqrt(base^2+perp^2))
+}
+
+#given:
+p = 4 #perpendicular height of triangle
+b = 3 #base of triangle
+h = hypo(b,p) #hypotenuse of triangle
+print(h) \ No newline at end of file