Answers

2015-02-15T13:20:56+05:30

This Is a Certified Answer

×
Certified answers contain reliable, trustworthy information vouched for by a hand-picked team of experts. Brainly has millions of high quality answers, all of them carefully moderated by our most trusted community members, but certified answers are the finest of the finest.
LET N = 1
LET SUM = 0

LOOP:
LET  SUM = SUM + N
LET N  = N + 1
IF N < 10 THEN GOTO  LOOP

PRINT N, SUM

END
=========================
ANOTHER PROGRAM

LET N = 1
PRINT  "NUMBER",  "ITS SQUARE",  "ITS CUBE"

FOR N = 1 TO 25  STEP 1
   PRINT  N,  N*N,  N*N*N
NEXT N

END

2 5 2
2015-02-15T13:55:46+05:30
drawing 
DIM x AS INTEGER
SCREEN 13 
CLS FOR x = 0 TO 65
  LINE (359 - x, 199 - x)-(120 + x, 100 + x), 25, B
NEXT x
END
.
REM ' Program to print roll "
CLS
INPUT '' What is your roll ''
PRINT roll$
END
.
DIM KeyPressed AS STRING
CLS
PRINT
PRINT
INPUT "Please Enter A Key (A,B,C,D): ", KeyPressed
 KeyPressed = UCASE$(KeyPressed)
 PRINT
 SELECT CASE KeyPressed
  CASE "A"
     PRINT "A Was Entered"
 CASE "B"
     PRINT "B Was Entered"
  CASE "C"
     PRINT "C Was Entered"
  CASE "D"
      PRINT "D Was Entered"
   CASE ELSE
     PRINT "Some Other Key Was Entered"
END SELECT

..................
REM " twinkle stars with sound "
CLS
PLAY "cde"
CLS
LOCATE 24.70
PRINT "*"
PLAY " fg "
CLS
LOCATE 1,39
PRINT "*"


0