Write a program to enter the numbers till the user wants and at the end it should display the count of positive and negative and zeros entered without using array?

Answer 1

1 PRINT "Kindly enter your next number, Master, or 'x' to end and total them up."

2 INPUT a$: IF a$ = "x" or a$ = "X" then GOTO 10

3 K = VAL(a$)

4 If K<0 then neg=neg+1: PRINT: GOTO 1

5 If K>0 then pos=pos+1: PRINT: GOTO 1

6 If K=0 then Z=z+1: PRINT: GOTO 1

10 PRINT: PRINT "Thank you, Master. I cannot express the joy that this exercise

has brought me. Here are your results: "

11 PRINT: PRINT "The number of positive numbers you entered was "; pos; "."

12 PRINT: PRINT "The number of negative numbers you entered was "; neg; "."

13 PRINT: PRINT "The number of zeros you entered was "; Z; "."

15 PRINT: PRINT: PRINT "Would you like to play again, Master ?"

16 PRINT "Kindly touch 'x' if no, or any other key if yes. I can hardly wait."

17 Input a$: IF a$ <> "X" and a$ <> "x" then GOTO 20

18 PRINT: PRINT "It has been my pleasure to cavort with you today, Master."

19 PRINT "Y'all come back now, y'hear !" : END

20 PRINT: CLS: PRINT "Oh GOODY! I love this game!"

21 pos=0: neg=0: Z=0

22 GOTO 1