Data Structure
Networking
RDBMS
Operating System
Java
MS Excel
iOS
HTML
CSS
Android
Python
C Programming
C++
C#
MongoDB
MySQL
Javascript
PHP
Physics
Chemistry
Biology
Mathematics
English
Economics
Psychology
Social Studies
Fashion Studies
Legal Studies
- Selected Reading
- UPSC IAS Exams Notes
- Developer's Best Practices
- Questions and Answers
- Effective Resume Writing
- HR Interview Questions
- Computer Glossary
- Who is Who
Haskell Program to calculate the volume and area of the Cylinder
This tutorial will help us in calculating the volume and area of the Cylinder. The volume of a cylinder is a measure of the amount of space inside the cylinder. The area involves the surface area of the cylinder. The formula for the volume of a cylinder is the product of the base area of the cylinder, which is given by πr^2 and the height h. The formula for the surface area of a cylinder is the sum of the areas of the two circular faces and the area of the rectangular lateral surface.
Algorithm
Step 1 − The Text.Printf module is imported.
Step 2 − The volume and area functions are defined on the basis of simple mathematical formula as volume r h = pi * r * r * h and area r h = (2 * pi * r * h) + (2 * pi * r * r) respectively.
Step 3 − Program execution will be started from main function. The main() function has whole control of the program. It is written as main = do. The main function takes the radius and height of the cylinder and then calls the volume and area functions to calculate the results.
Step 4 − The variables named, “radius” and “height” is being initialized. It will contain the radius and height of the cylinder whose area and volume is to be computed.
Step 5 − The final resultant volume and area value is displayed by using ‘printf’ statement once the volume and area functions are called.
Using User-defined Area and Volume Function
In this example, the two functions are defined as, volume and area, which take the radius and height of a cylinder as arguments and return its volume and surface area, respectively.
Example 1
import Text.Printf volume :: Double -> Double -> Double volume r h = pi * r * r * h area :: Double -> Double -> Double area r h = (2 * pi * r * h) + (2 * pi * r * r) main :: IO () main = do let radius = 5 let height = 10 let vol = volume radius height let ar = area radius height printf "Volume of the cylinder is: %.2f
" vol printf "Surface area of the cylinder is: %.2f
" ar
Output
Volume of the cylinder is: 785.40 Surface area of the cylinder is: 471.24
Using $ Operator and Print Function
This approach uses the $ operator to apply the function on the right to the argument on the left, effectively reducing the need for parentheses around the function call. Finally, it uses the print function to print the result to the console.
Example 2
import Text.Printf volume :: Double -> Double -> Double volume r h = pi * r * r * h area :: Double -> Double -> Double area r h = (2 * pi * r * h) + (2 * pi * r * r) main :: IO () main = do let radius = 5 let height = 10 print $ "Volume of the cylinder is: " ++ show (volume radius height) print $ "Surface area of the cylinder is: " ++ show (area radius height)
Output
"Volume of the cylinder is: 785.3981633974483" "Surface area of the cylinder is: 471.23889803846896"
Conclusion
There are different examples to calculate the volume and area of a cylinder, but the mathematical formula to compute the volume and area of the cylinder will always remains the same. In Haskell, the volume and the area of a cylinder can be calculated by using user-defined function or by using $ operator and print function.
171 Views
