CONVERT CENTIGRADE INTO FARENHEIT, FARENHEIT INTO CENTIGRADE, NC INTO IC, IC INTO NC, DOLLAR INTO NC AND NC INTO DOLLAR

56. to accept temperature in Fahrenheit  from user and convert into the Celsius.


REM PROGRAM TO CONVERT TEMPERATURE IN FARENHEIT TO CELCIUS
CLS
INPUT “ENTER TEMPERATURE IN FARENHEIT”; F
C = (F – 32) * (5 / 9)
PRINT “TEMPERATURE IN CELCIUS=”; C
END

USING SUB PROCEDURE

DECLARE SUB CONVERT (F)
CLS
INPUT “ENTER TEMPERATURE IN FARENHEIT”; F
CALL CONVERT (F)
END

SUB CONVERT (F)
C = (F – 32) * (5 / 9)
PRINT “TEMPERATURE IN CELCIUS=”; C
END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION CONVERT (F)
CLS
INPUT “ENTER TEMPERATURE IN FARENHEIT”; F
PRINT “TEMPERATURE IN CELCIUS=”; CONVERT (F)
END

FUNCTION  CONVERT (F)
C = (F – 32) * (5 / 9)
CONVERT = C
END FUNCTION

57. to accept temperature in Celcius from user and convert into the Farenheit.

REM PROGRAM TO CONVERT TEMPERATURE IN CELCIUS TO FARENHEIT
CLS
INPUT “ENTER TEMPERATURE IN CELCIUS”; C
F = C * (9 / 5) + 32
PRINT “TEMPERATURE IN FARENHEIT=”; F
END

USING SUB PROCEDURE

DECLARE SUB CONVERT (C)
CLS
INPUT “ENTER TEMPERATURE IN CELCIUS”; C
CALL CONVERT (C)
END

SUB CONVERT (C)
F = C * (9 / 5) + 32
PRINT “TEMPERATURE IN FARENHEIT=”; F
END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION CONVERT (C)
CLS
INPUT “ENTER TEMPERATURE IN CELCIUS”; C
PRINT “TEMPERATURE IN FARENHEIT=”; CONVERT (C)
END

FUNCTION CONVERT (C)
F = C * (9 / 5) + 32
CONVERT = F
END FUNCTION

57. to accept currency value in Nepalese Rupees and convert into Indian Currency

REM PROGRAM TO CONVERT NC VALUE INTO IC VALUE
CLS
INPUT “ENTER VALUE IN NEPALESE RUPEES”; NC
IC = NC / 1.6
PRINT “INDIAN CURRENCY VALUE=”; IC
END

USING SUB PROCEDURE

DECLARE SUB CONVERT (NC)
CLS
INPUT “ENTER VALUE IN NEPALESE RUPEES”; NC
CALL CONVERT (NC)
END

SUB CONVERT (NC)
IC = NC / 1.6
PRINT “INDIAN CURRENCY VALUE=”; IC
END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION CONVERT (NC)
CLS
INPUT “ENTER VALUE IN NEPALESE RUPEES”; NC
PRINT “INDIAN CURRENCY VALUE=”; CONVERT (NC)
END

FUNCTION CONVERT (NC)
IC = NC / 1.6
CONVERT = IC
END FUNCTION

58. to accept currency value in Indian Currency and convert into Nepalese Rupees

REM PROGRAM TO CONVERT IC VALUE INTO NC VALUE
CLS
INPUT “ENTER VALUE IN INDIAN VALUE”; IC
NC = IC * 1.6
PRINT “NEPALESE CURRENCY VALUE=”; NC
END

USING SUB PROCEDURE

DECLARE SUB CONVERT (IC)
CLS
INPUT “ENTER VALUE IN INDIAN VALUE”; IC
CALL CONVERT (IC)
END

SUB CONVERT (IC)
NC = IC * 1.6
PRINT “NEPALESE CURRENCY VALUE=”; NC
END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION CONVERT (IC)
CLS
INPUT “ENTER VALUE IN INDIAN VALUE”; IC
PRINT “NEPALESE CURRENCY VALUE=”; CONVERT (IC)
END

FUNCTION CONVERT (IC)
NC = IC * 1.6
CONVERT = NC
END FUNCTION

59. to accept currency value in dollar and convert into Nepalese Rupees

REM PROGRAM TO CONVERT DOLLAR INTO NC VALUE
CLS
INPUT “ENTER CURRENCY VALUE IN DOLLAR”; D
NC = D * 90
PRINT “NEPALESE CURRENCY VALUE=”; NC
END

USING SUB PROCEDURE

DECLARE SUB CONVERT (D)
CLS
INPUT “ENTER CURRENCY VALUE IN DOLLAR”; D
CALL CONVERT (D)
END

SUB CONVERT (D)
NC = D * 90
PRINT “NEPALESE CURRENCY VALUE=”; NC
END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION CONVERT (D)
CLS
INPUT “ENTER CURRENCY VALUE IN DOLLAR”; D
PRINT “NEPALESE CURRENCY VALUE=”; CONVERT (D)
END

FUNCTION CONVERT (D)
NC = D * 90
CONVERT = NC
END FUNCTION

60. to accept currency value in Nepalese Rupees and convert into dollar.

REM PROGRAM TO CONVERT NC VALUE INTO DOLLAR
CLS
INPUT “ENTER VALUE IN NEPALESE RUPEES”; NC
D = NC / 90
PRINT “DOLLAR CURRENCY VALUE=”; D
END

USING SUB PROCEDURE

DECLARE SUB CONVERT (NC)
CLS
INPUT “ENTER VALUE IN NEPALESE RUPEES”; NC
CALL CONVERT (NC)
END

SUB CONVERT (NC)
D = NC / 90
PRINT “DOLLAR CURRENCY VALUE=”; D
END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION CONVERT (NC)
CLS
INPUT “ENTER VALUE IN NEPALESE RUPEES”; NC
PRINT “DOLLAR CURRENCY VALUE=”;  CONVERT (NC)
END

FUNCTION CONVERT (NC)
D = NC / 90
CONVERT = D
END FUNCTION

Comments

Blog27999 said…
Do you understand there's a 12 word phrase you can say to your man... that will induce intense emotions of love and impulsive attractiveness for you deep within his chest?

That's because hidden in these 12 words is a "secret signal" that fuels a man's instinct to love, please and protect you with his entire heart...

====> 12 Words That Fuel A Man's Love Response

This instinct is so built-in to a man's mind that it will drive him to work better than before to take care of you.

Matter of fact, triggering this all-powerful instinct is absolutely important to having the best ever relationship with your man that the second you send your man one of the "Secret Signals"...

...You will immediately notice him expose his heart and mind for you in such a way he never expressed before and he will distinguish you as the one and only woman in the world who has ever truly tempted him.
February 26, 2020 at 10:50 PM
Post a Comment

Popular posts from this blog

PROGRAM TO FIND SQUARE, CUBE, SQUARE ROOT AND CUBE ROOT OF GIVEN NUMBER

7. Display square of an input number. REM PROGRAM TO DISPLAY SQUARE OF AN INPUT NUMBER CLS INPUT “ENTER ANY NUMBER”; N S = N ^ 2 PRINT “SQUARE OF NUMBER ”; S END USING SUB PROCEDURE DECLARE SUB SQUARE (N) CLS INPUT “ENTER ANY NUMBER”; N CALL SQUARE(N) END SUB SQUARE (N) S = N ^ 2 PRINT “SQUARE OF NUMBER “; S END SUB USING FUNCTION PROCEDURE DECLARE FUNCTION SQUARE (N) CLS INPUT “ENTER ANY NUMBER”; N S = SQUARE(N) PRINT “SQUARE OF NUMBER “; S END FUNCTION SQUARE (N) SQ= N ^ 2 SQUARE = SQ END FUNCTION 8. Display cube of an input number. REM PROGRAM TO DISPLAY CUBE OF AN INPUT NUMBER CLS INPUT “ENTER ANY NUMBER”; N C = N ^ 3 PRINT “CUBE OF NUMBER ”; C END USING SUB PROCEDURE DECLARE SUB CUBE (N) CLS INPUT “ENTER ANY NUMBER”; N CALL CUBE(N) END SUB CUBE (N) C = N ^ 3 PRINT “CUBE OF NUMBER “; C END SUB USING FUNCTION PROCEDURE DECLARE FUNCTION CUBE (N) CLS INP
Read more

PROGRAM TO DISPLAY SUM, PRODUCT, DIFFERENCE AND PRODUCT OF TWO / THREE NUMBERS

1. Enter any two numbers and display its sum. REM PROGRAM TO DISPLAY SUM OF TWO NUMBERS CLS INPUT “ENTER FIRST NUMBER”; A INPUT “ENTER SECOND NUMBER”; B S = A + B PRINT “SUM OF TWO NUMBERS”; S END USING SUB PROCEDURE DECLARE SUB SUM (A, B) CLS INPUT “ENTER FIRST NUMBER”; A INPUT “ENTER SECOND NUMBER”; B CALL SUM(A, B) END SUB SUM (A, B) S = A + B PRINT “SUM OF TWO NUMBERS”; S END SUB USING FUNCTION PROCEDURE DECLARE FUNCTION SUM (A, B) CLS INPUT “ENTER FIRST NUMBER”; A INPUT “ENTER SECOND NUMBER”; B S = SUM(A, B) PRINT “SUM OF TWO NUMBERS”; S END FUNCTION SUM (A, B) SU = A + B SUM = SU END FUNCTION 2. Enter any two numbers and display its difference. REM PROGRAM TO DISPLAY DIFFERENCE OF TWO NUMBERS CLS INPUT “ENTER FIRST NUMBER”; A INPUT “ENTER SECOND NUMBER”; B D = A - B PRINT “DIFFERENCE OF TWO NUMBERS”; D END USING SUB PROCEDURE DECLARE SUB DIFF (A, B) CLS INPUT “ENTER FIRST NUM
Read more

PALINDROME AND ARMSTRONG PROGRAMS

120.  WAP to input any number and check whether the given no. is palindrome or not. CLS INPUT "ENTER ANY NUMBER"; N A = N S = 0 WHILE N < > 0 R = N MOD 10 S = S * 10 + R N = N \ 10 WEND IF A = S THEN PRINT A; "IS PALINDROME" ELSE PRINT A; "IS NOT PALINDROME" END IF END USING SUB PROCEDURE DECLARE SUB PALIN (N) CLS INPUT "ENTER ANY NUMBER"; N CALL PALIN (N) END SUB PALIN (N) A = N S = 0 WHILE N < > 0 R = N MOD 10 S = S * 10 + R N = N \ 10 WEND IF A = S THEN PRINT A; "IS PALINDROME" ELSE PRINT A; "IS NOT PALINDROME" END IF END SUB USING FUNCTION PROCEDURE DECLARE FUNCTION PALIN (N) CLS INPUT "ENTER ANY NUMBER"; N P = PALIN ((N)) IF P = N THEN PRINT N; "IS PALINDROME" ELSE PRINT N; "IS NOT PALINDROME" END IF END FUNCTION PALIN (N) S = 0 WHILE N < > 0 R = N MOD 10
Read more