Wednesday, October 16, 2019

QBASIC to find Area of 4 walls using FUNCTION

DECLARE FUNCTION Area ( L, B, H )
CLS
INPUT "Enter length"; L
INPUT "Enter breadth"; B
INPUT "Enter height"; H
PRINT "Area of 4 walls = "; Area ( L, B, H )
END

 FUNCTION Area ( L, B, H )
Area = 2 * H * ( L + B )
END FUNCTION
at

No comments:

Post a Comment

Subscribe to: Post Comments (Atom)
  • Experience of JM
    During my time in high school I had it really good moments, but my best moments that I've experienced are in a particular class during ...
  • My Father
      My father My father name is Prem kumar Sunuwar.He is 39 years old.He is a mansion.He is my super hero of my life. He always help and su...
  • QBASIC to conver Temperature in Celsius in Fahrenheit using FUNCTION
    DECLARE FUNCTION CEL ( C ) CLS INPUT "Enter celsius"; C PRINT "Temperature in celsius fahrenheit = "; CEL ( C ) END ...