diff options
Diffstat (limited to 'Numerical_Methods_by_E_Balaguruswamy/CH4/EX4.4/Ex4_4.R')
| -rw-r--r-- | Numerical_Methods_by_E_Balaguruswamy/CH4/EX4.4/Ex4_4.R | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/Numerical_Methods_by_E_Balaguruswamy/CH4/EX4.4/Ex4_4.R b/Numerical_Methods_by_E_Balaguruswamy/CH4/EX4.4/Ex4_4.R new file mode 100644 index 00000000..9da6415f --- /dev/null +++ b/Numerical_Methods_by_E_Balaguruswamy/CH4/EX4.4/Ex4_4.R @@ -0,0 +1,17 @@ +# Example 4 Chapter 4 Page no.: 66
+# Roundoff error
+
+x <- 752.6835 #Given value
+
+tx1 <- 0.7526*(10^3) #using 4 mantissa to store value
+tx2 <- 0.835*(10^-1) #using 4 mantissa to store value
+
+Tx <- tx1+tx2 # True value
+
+cat("CHOPPING METHOD")
+cat("Approximate x=",tx1,"\n Error=",tx2)
+
+cat("Symmetric Rounding")
+cat("Error = (g(x)-1)*(10^-1) \n"," =",(tx2*10 -1)*10^-1)
+
+cat("Approximate x=0.7527*(10^3)")
\ No newline at end of file |