skip to main | skip to sidebar
Monday, December 20, 2010
Qbasic looping Programs
WAP TO PRINT ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO WHILE B<=50
PRINT A
A=A+2
B=B+1
LOOP
END
WAP TO PRINT ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
DO WHILE B<=50
PRINT A
A=A+2
B=B+1
LOOP
END
1,4,9,16,25
CLS
A=1
B=1
DO WHILE B<=5
PRINT A^2
A=A+1
B=B+1
LOOP
END
1, 9, 25….10TH TERM
CLS
A=1
B=1
DO WHILE B<=10
PRINT A^2
A=A+2
B=B+1
LOOP
END
100, 90,80,70,60
CLS
A=100
B=1
DO WHILE B<=5
PRINT A
A=A-10
B=B+1
LOOP
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
DO WHILE B<=10
PRINT A
A=A-1
B=B+1
LOOP
END
4,16,36,64,100
CLS
A=2
B=1
DO WHILE B<=5
PRINT A^2
A=A+2
B=B+1
LOOP
END
1, 8, 27……..5TH TERM
CLS
A=1
B=1
DO WHILE B<=5
PRINT A^3
A=A+1
B=B+1
LOOP
END
100, 98.5, 97, 95.5….10TH TERM
CLS
A=100
B=1
DO WHILE B<=10
PRINT A
A=A-1.5
B=B+1
LOOP
END
3, 6, 9, 12, 15………10TH TERM
CLS
A=3
B=1
DO WHILE B<=10
PRINT A
A=A+3
B=B+1
LOOP
END
1000,900,800,700,600
CLS
A=1000
B=1
DO WHILE B<=5
PRINT A
A=A-100
B=B+1
LOOP
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
DO WHILE B<=10
PRINT A
A=A+1
B=B+1
LOOP
END
5, 10, 15, 20…..10TH TERM
CLS
A=5
B=1
DO WHILE B<=10
PRINT A
A=A+5
B=B+1
LOOP
END
5, 25,125……5TH TERM
CLS
A=5
B=1
DO WHILE B<=5
PRINT A
A=A*5
B=B+1
LOOP
END
1
11
111
1111
11111
CLS
A=1
B=1
DO WHILE B<=5
PRINT A
A= (A*10) +1
B=B+1
LOOP
END
WAP TO GENERATE YOUR NAME TEN TIMES
CLS
A$=”AMENDRA”
B=1
DO WHILE B<=5
PRINT A$
B=B+1
LOOP
END
10, 20,30,40,50
CLS
A=10
B=1
DO WHILE B<=5
PRINT A
A=A+10
B=B+1
LOOP
END
-10,-5, 0,5,10
CLS
A=-10
B=1
DO WHILE B<=5
PRINT A
A=A+5
B=B+1
LOOP
END
SUM OF ALL ODD NMBER FROM 1 TO 100
CLS
A=1
B=1
DO WHILE B<=50
S=S+A
A=A+1
B=B+1
LOOP
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NMBER FROM 1 TO 100
CLS
A=2
B=1
DO WHILE B<=50
S=S+A
A=A+2
B=B+1
LOOP
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO WHILE B<=100
S=S+A
A=A+1
B=B+1
LOOP
PRINT”THE SUM IS”; S
END
SUMOF SQUARE NO FROM 1 TO 5
CLS
A=1
B=1
DO WHILE B<=5
PRINT A^2
S=S+A^2
A=A+1
B=B+1
LOOP
PRINT”THE SUM IS”; S
END
FIBROUS SERIES
CLS
A=2
B=2
D=1
PRINT A; B
DO WHILE D<=10
C=A+B
PRINT C
A=B
B=C
D=D+1
LOOP
END
WAP TO PRINT ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO
PRINT A
A=A+2
B=B+1
LOOP WHILE B<=50
END
WAP TO PRINT ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
DO
PRINT A
A=A+2
B=B+1
LOOP WHILE B<=50
END
1,4,9,16,25
CLS
A=1
B=1
DO
PRINT A^2
A=A+1
B=B+1
LOOP WHILE B<=5
END
1, 9, 25….10TH TERM
CLS
A=1
B=1
DO
PRINT A^2
A=A+2
B=B+1
LOOP WHILE B<=10
END
100, 90,80,70,60
CLS
A=100
B=1
DO
PRINT A
A=A-10
B=B+1
LOOP WHILE B<=5
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
DO
PRINT A
A=A-1
B=B+1
LOOP WHILE B<=10
END
4,16,36,64,100
CLS
A=2
B=1
DO
PRINT A^2
A=A+2
B=B+1
LOOP WHILE B<=5
END
1, 8, 27……..5TH TERM
CLS
A=1
B=1
DO
PRINT A^3
A=A+1
B=B+1
LOOP WHILE B<=5
END
100, 98.5, 97, 95.5….10TH TERM
CLS
A=100
B=1
DO
PRINT A
A=A-1.5
B=B+1
LOOP WHILE B<=10
END
3, 6, 9, 12, 15………10TH TERM
CLS
A=3
B=1
DO
PRINT A
A=A+3
B=B+1
LOOP WHILE B<=10
END
1000,900,800,700,600
CLS
A=1000
B=1
DO
PRINT A
A=A-100
B=B+1
LOOP WHILE B<=5
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
DO
PRINT A
A=A+1
B=B+1
LOOP WHILE B<=10
END
5, 10, 15, 20…..10TH TERM
CLS
A=5
B=1
DO
PRINT A
A=A+5
B=B+1
LOOP WHILE B<=10
END
5, 25,125……5TH TERM
CLS
A=5
B=1
DO
PRINT A
A=A*5
B=B+1
LOOP WHILE B<=5
END
1
11
111
1111
11111
CLS
A=1
B=1
DO
PRINT A
A= (A*10) +1
B=B+1
LOOP WHILE B<=5
END
WAP TO GENERATE YOUR NAME TEN TIMES
CLS
A$=”AMENDRA”
B=1
DO WHILE B<=5
PRINT A$
B=B+1
LOOP WHILE B<=5
END
10, 20,30,40,50
CLS
A=10
B=1
DO
PRINT A
A=A+10
B=B+1
LOOP WHILE B<=5
END
-10,-5, 0,5,10
CLS
A=-10
B=1
DO
PRINT A
A=A+5
B=B+1
LOOP WHILE B<=5
END
SUM OF ALL ODD NMBER FROM 1 TO 100
CLS
A=1
B=1
DO
S=S+A
A=A+1
B=B+1
LOOP WHILE B<=50
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NMBER FROM 1 TO 100
CLS
A=2
B=1
DO
S=S+A
A=A+2
B=B+1
LOOP WHILE B<=50
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO
S=S+A
A=A+1
B=B+1
LOOP WHILE B<=100
PRINT”THE SUM IS”; S
END
SUMOF SQUARE NO FROM 1 TO 5
CLS
A=1
B=1
DO
PRINT A^2
S=S+A^2
A=A+1
B=B+1
LOOP WHILE B<=5
PRINT”THE SUM IS”; S
END
FIBROUS SERIES
CLS
A=2
B=2
D=1
PRINT A; B
DO
C=A+B
PRINT C
A=B
B=C
D=D+1
LOOP WHILE D<=10
END
WAP TO PRINT ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO
PRINT A
A=A+2
B=B+1
LOOP UNTIL B>50
END
WAP TO PRINT ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
DO
PRINT A
A=A+2
B=B+1
LOOP UNTIL B>50
END
1,4,9,16,25
CLS
A=1
B=1
DO
PRINT A^2
A=A+1
B=B+1
LOOP UNTIL B>5
END
1, 9, 25….10TH TERM
CLS
A=1
B=1
DO
PRINT A^2
A=A+2
B=B+1
LOOP UNTIL B>10
END
100, 90,80,70,60
CLS
A=100
B=1
DO
PRINT A
A=A-10
B=B+1
LOOP UNTIL B>5
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
DO
PRINT A
A=A-1
B=B+1
LOOP UNTIL B>10
END
4,16,36,64,100
CLS
A=2
B=1
DO
PRINT A^2
A=A+2
B=B+1
LOOP UNTIL B>5
END
1, 8, 27……..5TH TERM
CLS
A=1
B=1
DO
PRINT A^3
A=A+1
B=B+1
LOOP UNTIL B>5
END
100, 98.5, 97, 95.5….10TH TERM
CLS
A=100
B=1
DO UNTIL B>10
PRINT A
A=A-1.5
B=B+1
LOOP UNTIL B>10
END
3, 6, 9, 12, 15………10TH TERM
CLS
A=3
B=1
DO
PRINT A
A=A+3
B=B+1
LOOP UNTIL B>10
END
1000,900,800,700,600
CLS
A=1000
B=1
DO
PRINT A
A=A-100
B=B+1
LOOP UNTIL B>5
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
DO
PRINT A
A=A+1
B=B+1
LOOP UNTIL B>10
END
5, 10, 15, 20…..10TH TERM
CLS
A=5
B=1
DO
PRINT A
A=A+5
B=B+1
LOOP UNTIL B>10
END
5, 25,125……5TH TERM
CLS
A=5
B=1
DO
PRINT A
A=A*5
B=B+1
LOOP UNTIL B>5
END
WAP TO GENERATE YOUR NAME TEN TIMES
CLS
A$=”AMENDRA”
B=1
DO
PRINT A$
B=B+1
LOOP UNTIL B>5
END
10, 20,30,40,50
CLS
A=10
B=1
DO
PRINT A
A=A+10
B=B+1
LOOP UNTIL B>5
END
-10,-5, 0,5,10
CLS
A=-10
B=1
DO
PRINT A
A=A+5
B=B+1
LOOP UNTIL B>5
END
SUM OF ALL ODD NMBER FROM 1 TO 100
CLS
A=1
B=1
DO
S=S+A
A=A+1
B=B+1
LOOP UNTIL B>50
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NMBER FROM 1 TO 100
CLS
A=2
B=1
DO UNTIL B>50
S=S+A
A=A+2
B=B+1
LOOP UNTIL B>50
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO
S=S+A
A=A+1
B=B+1
LOOP UNTIL B>100
PRINT”THE SUM IS”; S
END
SUMOF SQUARE NO FROM 1 TO 5
CLS
A=1
B=1
DO
PRINT A^2
S=S+A^2
A=A+1
B=B+1
LOOP UNTIL B>5
PRINT”THE SUM IS”; S
END
FIBROUS SERIES
CLS
A=2
B=2
D=1
PRINT A; B
DO
C=A+B
PRINT C
A=B
B=C
D=D+1
LOOP UNTIL D>10
END
1
11
111
1111
11111
CLS
A=1
B=1
DO
PRINT A
A= (A*10) +1
B=B+1
LOOP UNTIL B>5
END
WAP TO GENERATE THE FOLLOWING PATTERN
ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
10:
PRINT A
A=A+2
B=B+1
IF B<= 50 THEN GO TO 10
END
ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
10:
PRINT A
A=A+2
B=B+1
IF B<= 50 THEN GO TO 10
END
1,4,9,16,25
CLS
A=1
B=1
10:
PRINT A^2
A=A+1
B=B+1
IF B<=5 THEN GO TO 10
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
10:
PRINT A
A=A-1
B=B+1
IF B<= 10 THEN GO TO 10
END
1, 8, 27….. FIFTH TERM
CLS
A=1
B=1
10:
PRINT A^3
A=A+1
B=B+1
IF B<= 5THEN GO TO 10
END
3, 6, 9, 12, 15…….10 TH TERM
CLS
A=3
B=1
10:
PRINT A
A=A+3
B=B+1
IF B<= 10 THEN GO TO 10
END
1000,900,800,700,600
CLS
A=1000
B=1
10:
PRINT A
A=A-100
B=B+1
IF B<= 5 THEN GO TO 10
END
1, 9,25,49,81
CLS
A=1
B=1
10:
PRINT A^2
A=A+2
B=B+1
IF B<= 5 THEN GO TO 10
END
4, 16, 36…….10TH TERM
CLS
A=2
B=1
10:
PRINT A^2
A=A+2
B=B+1
IF B<= 10 THEN GO TO 10
END
5, 25,125……10TH TERM
CLS
A=5
B=1
START:
PRINT A
A=A*5
B=B+1
IF B<= 10 THEN GO TO START
END
100, 90,80,70,60
CLS
A=100
B=1
10:
PRINT A
A=A-10
B=B+1
IF B<= 5THEN GO TO 10
END
5, 10, 15, 20…. 10TH TERM
CLS
A=5
B=1
START:
PRINT A
A=A+5
B=B+1
IF B<= 10 THEN GO TO START
END
10, 20,30,40,50
CLS
A=10
B=1
10:
PRINT A
A=A+1
B=B+1
IF B<= 5 THEN GO TO 10
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
10:
PRINT A
A=A+1
B=B+1
IF B<= 11 THEN GO TO 10
END
SUM OF ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
10:
S=S+A
A=A+2
B=B+1
IF B<= 50 THEN GO TO 10
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
10:
S=S+A
A=A+2
B=B+1
IF B<= 50 THEN GO TO 10
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
10:
S=S+A
A=A+1
B=B+1
IF B<= 100 THEN GO TO 10
PRINT”THE SUM IS”; S
END
100, 98.5, 97…….10TH TERM
CLS
A=100
B=1
10:
PRINT A
A=A-1.5
B=B+1
IF B<= 10 THEN GO TO 10
PRINT”THE SUM IS”; S
END
SUM OF SQUARE NO FROM 1 TO5
CLS
A=1
B=1
START:
S=S+A^2
A=A+1
B=B+1
IF B<= 5 THEN GO TO START
PRINT”THE SUM IS”; S
END
ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
START:
PRINT A
A=A+1
B=B+1
IF B<=100 THEN GO TO START
END
ALL NUMBER FROM 1 TO 100
CLS
A=1
FOR I=1 TO 100
PRINT A
A=A+1
NEXT I
END
ODD NUMBER
CLS
FOR I= 1 TO 100 STEP 2
PRINT I
NEXT I
END
EVEN NUMBER
CLS
FOR I= 2 TO 100 STEP 2
PRINT I
NEXT I
END
CLS
A=1
FOR I= 1 TO 5
PRINT A
A= (A*10) +1
NEXT I
END
OUTPUT
1
11
111
1111
11111
WAP TO PRINT YOUR NAME TEN TIMES
CLS
A$”AMENDRA”
FOR I= 1 TO 10
RINT A$
NEXT I
END
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
WRITE THE OUTPUT OF THE FOLLOWING PROGAMME
CLS
FOR I= 1 TO5
FOR J= 1 TO I
PRINT J;
NEXT J
PRINT
NEXT I
END
OUT PUT
1
1 2
1 2 3
1 2 3 4
1 2 3 4 5
CLS
FOR I= 1 TO5
FOR J= 1 TO I
PRINT I;
NEXT J
PRINT
NEXT I
END
OUT PUT
1
2 2
3 3 3
4 4 4 4
5 5 5 5 5
CLS
FOR I= 5 TO1 STEP-1
FOR J= 1 TO I
PRINT J;
NEXT J
PRINT
NEXT I
END
OUT PUT
1 2 3 4 5
1 2 3 4
1 2 3
1 2
1
CLS
FOR I= 5 TO1 STEP-1
FOR J= 1 TO I
PRINT I;
NEXT J
PRINT
NEXT I
END
OUT PUT
5 5 5 5 5
4 4 4 4
3 3 3
2 2
1
CLS
FOR I= 1 TO5
FOR J= 5 TO I STEP-1
PRINT J;
NEXT J
PRINT
NEXT I
END
OUT PUT
5 4 3 2 1
5 4 3 2
5 4 3
5 4
5
CLS
FOR I= 1 TO5
FOR J= 1 TO I
PRINT I
NEXT J
PRINT
NEXT I
END
OUT PUT
1 4
1 4
1
1
1
5
2
2
2
2
3
3
3
FIBROUS SERIES
CLS
A=1
B=1
PRINT A;B
FOR I= 1 TO 8
C=A+B
A=B
B=C
NEXT I
END
OUTPUT
1 1
2
3
5
8
13
21
34
55
WAO TO CHECK THET GIVEN NUMBER IS ARNSTRONG OR NOT
CLS
INPUT”ENTER THE NUMBER”;N
A=N
WHILE N<>0
R=N MOD 10
S=S+R^3
N=N/10
WEND
IF S=A THEN
PRINT”IT IS ARMSTRONG”
ELSE
PRINT”IT IS NOT ARMSTRONG”
END IF
END
WAP TO CHECK THE GIVEN NUMBER IS PRIME OR NOT
CLS
INPUT”ENTER A NUMBER”;N
FOR I= 1 TO N
IF N MOD I=0 THEN
C=C+1
END IF
NEXT I
IF C<=2 THEN
PRINT”THE NUMBER IS PRIME”
ELSE
PRINT”THE NUMBER IS NOT PRIME”
END
WAP TO INPUT A NUMBER (MULTIDIGIT) AND FIND ITS SUM
CLS
INPUT”ENTERS THE MULTIDIGIT NUMBER”; N
WHILE N MOD 10
R=N MOD 10
S=S+R
N=N/10
WEND
PRINT”THE SUMIS”; S
END
WAP TO INPUT A NUMBER (MULTIDIGIT) AND FIND ITS PRODUCT
CLS
INPUT”ENTERS THE MULTIDIGIT NUMBER”; N
S=1
WHILE N MOD 10
R=N MOD 10
S=S*R
N=N/10
WEND
PRINT”THE SUMIS”; S
END
WAP TO FIND IT’S OUTOUT
HAILSTROM PATTERN
CLS
A=7
FOR I=1 TO 5
PRINT A
IF A MOD 2<>0 THEN
A-A*3+1
ELSE
A=A/2
END IF
NEXT I
END
WAP TO PRINT THE MULTIDIGIT NUMBER IN REVERSE FORM
CLS
A=12345
WHILE A<>0
R=A MOD 10
S=S*10+R
A=A/10
WEND
PRINT S
END
OUTPUT
5
50+4
54*10
543*10
5432*10
54321
OUTPUT
54321
WAP TO PRINT THE SUM OF THE EVEN NUMBER OF THE MULTIDIGIT NUMBER
CLS
INPUT”ENTERS A MULTIDIGIT NUMBER”; N
WHILE N<>0
R=N MOD 10
IF R MOD 2=0 THEN
S=S+R
END IF
WEND
PRINT”THE SUM OF THE EVEN NUMBER”; S
END
WAP TO PRINT THE SUM OF THE ODD NUMBER OF THE MULTIDIGIT NUMBER
CLS
INPUT”ENTERS A MULTIDIGIT NUMBER”; N
WHILE N<>0
R=N MOD 10
IF R MOD 2<>0 THEN
S=S+R
END IF
WEND
PRINT”THE SUM OF THE EVEN NUMBER”; S
END
WAP TO PRINT ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
WHILE B<=50
PRINT A
A=A+2
B=B+1
WEND
END
WAP TO PRINT ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
WHILE B<=50
PRINT A
A=A+2
B=B+1
WEND
END
1,4,9,16,25
CLS
A=1
B=1
WHILE B<=5
PRINT A^2
A=A+1
B=B+1
WEND
END
1, 9, 25….10TH TERM
CLS
A=1
B=1
WHILE B<=10
PRINT A^2
A=A+2
B=B+1
WEND
END
100, 90,80,70,60
CLS
A=100
B=1
WHILE B<=5
PRINT A
A=A-10
B=B+1
WEND
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
WHILE B<=10
PRINT A
A=A-1
B=B+1
WEND
END
4,16,36,64,100
CLS
A=2
B=1
WHILE B<=5
PRINT A^2
A=A+2
B=B+1
WEND
END
1, 8, 27……..5TH TERM
CLS
A=1
B=1
WHILE B<=5
PRINT A^3
A=A+1
B=B+1
WEND
END
100, 98.5, 97, 95.5….10TH TERM
CLS
A=100
B=1
WHILE B<=10
PRINT A
A=A-1.5
B=B+1
WEND
END
3, 6, 9, 12, 15………10TH TERM
CLS
A=3
B=1
WHILE B<=10
PRINT A
A=A+3
B=B+1
WEND
END
1000,900,800,700,600
CLS
A=1000
B=1
WHILE B<=5
PRINT A
A=A-100
B=B+1
WEND
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
WHILE B<=10
PRINT A
A=A+1
B=B+1
WEND
END
5, 10, 15, 20…..10TH TERM
CLS
A=5
B=1
WHILE B<=10
PRINT A
A=A+5
B=B+1
WEND
END
5, 25,125……5TH TERM
CLS
A=5
B=1
WHILE B<=5
PRINT A
A=A*5
B=B+1
WEND
END
1
11
111
1111
11111
CLS
A=1
B=1
WHILE B<=5
PRINT A
A= (A*10) +1
B=B+1
WEND
END
WAP TO GENERATE YOUR NAME TEN TIMES
CLS
A$=”AMENDRA”
B=1
WHILE B<=5
PRINT A$
B=B+1
WEND
END
10, 20,30,40,50
CLS
A=10
B=1
WHILE B<=5
PRINT A
A=A+10
B=B+1
WEND
END
-10,-5, 0,5,10
CLS
A=-10
B=1
WHILE B<=5
PRINT A
A=A+5
B=B+1
WEND
END
SUM OF ALL ODD NMBER FROM 1 TO 100
CLS
A=1
B=1
WHILE B<=50
S=S+A
A=A+1
B=B+1
WEND
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NMBER FROM 1 TO 100
CLS
A=2
B=1
WHILE B<=50
S=S+A
A=A+2
B=B+1
WEND
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
WHILE B<=100
S=S+A
A=A+1
B=B+1
WEND
PRINT”THE SUM IS”; S
END
SUMOF SQUARE NO FROM 1 TO 5
CLS
A=1
B=1
WHILE B<=5
PRINT A^2
S=S+A^2
A=A+1
B=B+1
WEND
PRINT”THE SUM IS”; S
END
FIBROUS SERIES
CLS
A=2
B=2
D=1
PRINT A; B
WHILE D<=10
C=A+B
PRINT C
A=B
B=C
D=D+1
WEND
END
SYNTAX
DO WHILE
LOOP
DO UNTIL
LOOP
CLS
A=1
B=1
DO WHILE B<=50
PRINT A
A=A+2
B=B+1
LOOP
END
WAP TO PRINT ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
DO WHILE B<=50
PRINT A
A=A+2
B=B+1
LOOP
END
1,4,9,16,25
CLS
A=1
B=1
DO WHILE B<=5
PRINT A^2
A=A+1
B=B+1
LOOP
END
1, 9, 25….10TH TERM
CLS
A=1
B=1
DO WHILE B<=10
PRINT A^2
A=A+2
B=B+1
LOOP
END
100, 90,80,70,60
CLS
A=100
B=1
DO WHILE B<=5
PRINT A
A=A-10
B=B+1
LOOP
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
DO WHILE B<=10
PRINT A
A=A-1
B=B+1
LOOP
END
4,16,36,64,100
CLS
A=2
B=1
DO WHILE B<=5
PRINT A^2
A=A+2
B=B+1
LOOP
END
1, 8, 27……..5TH TERM
CLS
A=1
B=1
DO WHILE B<=5
PRINT A^3
A=A+1
B=B+1
LOOP
END
100, 98.5, 97, 95.5….10TH TERM
CLS
A=100
B=1
DO WHILE B<=10
PRINT A
A=A-1.5
B=B+1
LOOP
END
3, 6, 9, 12, 15………10TH TERM
CLS
A=3
B=1
DO WHILE B<=10
PRINT A
A=A+3
B=B+1
LOOP
END
1000,900,800,700,600
CLS
A=1000
B=1
DO WHILE B<=5
PRINT A
A=A-100
B=B+1
LOOP
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
DO WHILE B<=10
PRINT A
A=A+1
B=B+1
LOOP
END
5, 10, 15, 20…..10TH TERM
CLS
A=5
B=1
DO WHILE B<=10
PRINT A
A=A+5
B=B+1
LOOP
END
5, 25,125……5TH TERM
CLS
A=5
B=1
DO WHILE B<=5
PRINT A
A=A*5
B=B+1
LOOP
END
1
11
111
1111
11111
CLS
A=1
B=1
DO WHILE B<=5
PRINT A
A= (A*10) +1
B=B+1
LOOP
END
WAP TO GENERATE YOUR NAME TEN TIMES
CLS
A$=”AMENDRA”
B=1
DO WHILE B<=5
PRINT A$
B=B+1
LOOP
END
10, 20,30,40,50
CLS
A=10
B=1
DO WHILE B<=5
PRINT A
A=A+10
B=B+1
LOOP
END
-10,-5, 0,5,10
CLS
A=-10
B=1
DO WHILE B<=5
PRINT A
A=A+5
B=B+1
LOOP
END
SUM OF ALL ODD NMBER FROM 1 TO 100
CLS
A=1
B=1
DO WHILE B<=50
S=S+A
A=A+1
B=B+1
LOOP
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NMBER FROM 1 TO 100
CLS
A=2
B=1
DO WHILE B<=50
S=S+A
A=A+2
B=B+1
LOOP
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO WHILE B<=100
S=S+A
A=A+1
B=B+1
LOOP
PRINT”THE SUM IS”; S
END
SUMOF SQUARE NO FROM 1 TO 5
CLS
A=1
B=1
DO WHILE B<=5
PRINT A^2
S=S+A^2
A=A+1
B=B+1
LOOP
PRINT”THE SUM IS”; S
END
FIBROUS SERIES
CLS
A=2
B=2
D=1
PRINT A; B
DO WHILE D<=10
C=A+B
PRINT C
A=B
B=C
D=D+1
LOOP
END
WAP TO PRINT ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO
PRINT A
A=A+2
B=B+1
LOOP WHILE B<=50
END
WAP TO PRINT ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
DO
PRINT A
A=A+2
B=B+1
LOOP WHILE B<=50
END
1,4,9,16,25
CLS
A=1
B=1
DO
PRINT A^2
A=A+1
B=B+1
LOOP WHILE B<=5
END
1, 9, 25….10TH TERM
CLS
A=1
B=1
DO
PRINT A^2
A=A+2
B=B+1
LOOP WHILE B<=10
END
100, 90,80,70,60
CLS
A=100
B=1
DO
PRINT A
A=A-10
B=B+1
LOOP WHILE B<=5
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
DO
PRINT A
A=A-1
B=B+1
LOOP WHILE B<=10
END
4,16,36,64,100
CLS
A=2
B=1
DO
PRINT A^2
A=A+2
B=B+1
LOOP WHILE B<=5
END
1, 8, 27……..5TH TERM
CLS
A=1
B=1
DO
PRINT A^3
A=A+1
B=B+1
LOOP WHILE B<=5
END
100, 98.5, 97, 95.5….10TH TERM
CLS
A=100
B=1
DO
PRINT A
A=A-1.5
B=B+1
LOOP WHILE B<=10
END
3, 6, 9, 12, 15………10TH TERM
CLS
A=3
B=1
DO
PRINT A
A=A+3
B=B+1
LOOP WHILE B<=10
END
1000,900,800,700,600
CLS
A=1000
B=1
DO
PRINT A
A=A-100
B=B+1
LOOP WHILE B<=5
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
DO
PRINT A
A=A+1
B=B+1
LOOP WHILE B<=10
END
5, 10, 15, 20…..10TH TERM
CLS
A=5
B=1
DO
PRINT A
A=A+5
B=B+1
LOOP WHILE B<=10
END
5, 25,125……5TH TERM
CLS
A=5
B=1
DO
PRINT A
A=A*5
B=B+1
LOOP WHILE B<=5
END
1
11
111
1111
11111
CLS
A=1
B=1
DO
PRINT A
A= (A*10) +1
B=B+1
LOOP WHILE B<=5
END
WAP TO GENERATE YOUR NAME TEN TIMES
CLS
A$=”AMENDRA”
B=1
DO WHILE B<=5
PRINT A$
B=B+1
LOOP WHILE B<=5
END
10, 20,30,40,50
CLS
A=10
B=1
DO
PRINT A
A=A+10
B=B+1
LOOP WHILE B<=5
END
-10,-5, 0,5,10
CLS
A=-10
B=1
DO
PRINT A
A=A+5
B=B+1
LOOP WHILE B<=5
END
SUM OF ALL ODD NMBER FROM 1 TO 100
CLS
A=1
B=1
DO
S=S+A
A=A+1
B=B+1
LOOP WHILE B<=50
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NMBER FROM 1 TO 100
CLS
A=2
B=1
DO
S=S+A
A=A+2
B=B+1
LOOP WHILE B<=50
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO
S=S+A
A=A+1
B=B+1
LOOP WHILE B<=100
PRINT”THE SUM IS”; S
END
SUMOF SQUARE NO FROM 1 TO 5
CLS
A=1
B=1
DO
PRINT A^2
S=S+A^2
A=A+1
B=B+1
LOOP WHILE B<=5
PRINT”THE SUM IS”; S
END
FIBROUS SERIES
CLS
A=2
B=2
D=1
PRINT A; B
DO
C=A+B
PRINT C
A=B
B=C
D=D+1
LOOP WHILE D<=10
END
WAP TO PRINT ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO
PRINT A
A=A+2
B=B+1
LOOP UNTIL B>50
END
WAP TO PRINT ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
DO
PRINT A
A=A+2
B=B+1
LOOP UNTIL B>50
END
1,4,9,16,25
CLS
A=1
B=1
DO
PRINT A^2
A=A+1
B=B+1
LOOP UNTIL B>5
END
1, 9, 25….10TH TERM
CLS
A=1
B=1
DO
PRINT A^2
A=A+2
B=B+1
LOOP UNTIL B>10
END
100, 90,80,70,60
CLS
A=100
B=1
DO
PRINT A
A=A-10
B=B+1
LOOP UNTIL B>5
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
DO
PRINT A
A=A-1
B=B+1
LOOP UNTIL B>10
END
4,16,36,64,100
CLS
A=2
B=1
DO
PRINT A^2
A=A+2
B=B+1
LOOP UNTIL B>5
END
1, 8, 27……..5TH TERM
CLS
A=1
B=1
DO
PRINT A^3
A=A+1
B=B+1
LOOP UNTIL B>5
END
100, 98.5, 97, 95.5….10TH TERM
CLS
A=100
B=1
DO UNTIL B>10
PRINT A
A=A-1.5
B=B+1
LOOP UNTIL B>10
END
3, 6, 9, 12, 15………10TH TERM
CLS
A=3
B=1
DO
PRINT A
A=A+3
B=B+1
LOOP UNTIL B>10
END
1000,900,800,700,600
CLS
A=1000
B=1
DO
PRINT A
A=A-100
B=B+1
LOOP UNTIL B>5
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
DO
PRINT A
A=A+1
B=B+1
LOOP UNTIL B>10
END
5, 10, 15, 20…..10TH TERM
CLS
A=5
B=1
DO
PRINT A
A=A+5
B=B+1
LOOP UNTIL B>10
END
5, 25,125……5TH TERM
CLS
A=5
B=1
DO
PRINT A
A=A*5
B=B+1
LOOP UNTIL B>5
END
WAP TO GENERATE YOUR NAME TEN TIMES
CLS
A$=”AMENDRA”
B=1
DO
PRINT A$
B=B+1
LOOP UNTIL B>5
END
10, 20,30,40,50
CLS
A=10
B=1
DO
PRINT A
A=A+10
B=B+1
LOOP UNTIL B>5
END
-10,-5, 0,5,10
CLS
A=-10
B=1
DO
PRINT A
A=A+5
B=B+1
LOOP UNTIL B>5
END
SUM OF ALL ODD NMBER FROM 1 TO 100
CLS
A=1
B=1
DO
S=S+A
A=A+1
B=B+1
LOOP UNTIL B>50
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NMBER FROM 1 TO 100
CLS
A=2
B=1
DO UNTIL B>50
S=S+A
A=A+2
B=B+1
LOOP UNTIL B>50
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
DO
S=S+A
A=A+1
B=B+1
LOOP UNTIL B>100
PRINT”THE SUM IS”; S
END
SUMOF SQUARE NO FROM 1 TO 5
CLS
A=1
B=1
DO
PRINT A^2
S=S+A^2
A=A+1
B=B+1
LOOP UNTIL B>5
PRINT”THE SUM IS”; S
END
FIBROUS SERIES
CLS
A=2
B=2
D=1
PRINT A; B
DO
C=A+B
PRINT C
A=B
B=C
D=D+1
LOOP UNTIL D>10
END
1
11
111
1111
11111
CLS
A=1
B=1
DO
PRINT A
A= (A*10) +1
B=B+1
LOOP UNTIL B>5
END
WAP TO GENERATE THE FOLLOWING PATTERN
ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
10:
PRINT A
A=A+2
B=B+1
IF B<= 50 THEN GO TO 10
END
ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
10:
PRINT A
A=A+2
B=B+1
IF B<= 50 THEN GO TO 10
END
1,4,9,16,25
CLS
A=1
B=1
10:
PRINT A^2
A=A+1
B=B+1
IF B<=5 THEN GO TO 10
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
10:
PRINT A
A=A-1
B=B+1
IF B<= 10 THEN GO TO 10
END
1, 8, 27….. FIFTH TERM
CLS
A=1
B=1
10:
PRINT A^3
A=A+1
B=B+1
IF B<= 5THEN GO TO 10
END
3, 6, 9, 12, 15…….10 TH TERM
CLS
A=3
B=1
10:
PRINT A
A=A+3
B=B+1
IF B<= 10 THEN GO TO 10
END
1000,900,800,700,600
CLS
A=1000
B=1
10:
PRINT A
A=A-100
B=B+1
IF B<= 5 THEN GO TO 10
END
1, 9,25,49,81
CLS
A=1
B=1
10:
PRINT A^2
A=A+2
B=B+1
IF B<= 5 THEN GO TO 10
END
4, 16, 36…….10TH TERM
CLS
A=2
B=1
10:
PRINT A^2
A=A+2
B=B+1
IF B<= 10 THEN GO TO 10
END
5, 25,125……10TH TERM
CLS
A=5
B=1
START:
PRINT A
A=A*5
B=B+1
IF B<= 10 THEN GO TO START
END
100, 90,80,70,60
CLS
A=100
B=1
10:
PRINT A
A=A-10
B=B+1
IF B<= 5THEN GO TO 10
END
5, 10, 15, 20…. 10TH TERM
CLS
A=5
B=1
START:
PRINT A
A=A+5
B=B+1
IF B<= 10 THEN GO TO START
END
10, 20,30,40,50
CLS
A=10
B=1
10:
PRINT A
A=A+1
B=B+1
IF B<= 5 THEN GO TO 10
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
10:
PRINT A
A=A+1
B=B+1
IF B<= 11 THEN GO TO 10
END
SUM OF ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
10:
S=S+A
A=A+2
B=B+1
IF B<= 50 THEN GO TO 10
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
10:
S=S+A
A=A+2
B=B+1
IF B<= 50 THEN GO TO 10
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
10:
S=S+A
A=A+1
B=B+1
IF B<= 100 THEN GO TO 10
PRINT”THE SUM IS”; S
END
100, 98.5, 97…….10TH TERM
CLS
A=100
B=1
10:
PRINT A
A=A-1.5
B=B+1
IF B<= 10 THEN GO TO 10
PRINT”THE SUM IS”; S
END
SUM OF SQUARE NO FROM 1 TO5
CLS
A=1
B=1
START:
S=S+A^2
A=A+1
B=B+1
IF B<= 5 THEN GO TO START
PRINT”THE SUM IS”; S
END
ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
START:
PRINT A
A=A+1
B=B+1
IF B<=100 THEN GO TO START
END
ALL NUMBER FROM 1 TO 100
CLS
A=1
FOR I=1 TO 100
PRINT A
A=A+1
NEXT I
END
ODD NUMBER
CLS
FOR I= 1 TO 100 STEP 2
PRINT I
NEXT I
END
EVEN NUMBER
CLS
FOR I= 2 TO 100 STEP 2
PRINT I
NEXT I
END
CLS
A=1
FOR I= 1 TO 5
PRINT A
A= (A*10) +1
NEXT I
END
OUTPUT
1
11
111
1111
11111
WAP TO PRINT YOUR NAME TEN TIMES
CLS
A$”AMENDRA”
FOR I= 1 TO 10
RINT A$
NEXT I
END
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
AMENDRA
WRITE THE OUTPUT OF THE FOLLOWING PROGAMME
CLS
FOR I= 1 TO5
FOR J= 1 TO I
PRINT J;
NEXT J
NEXT I
END
OUT PUT
1
1 2
1 2 3
1 2 3 4
1 2 3 4 5
CLS
FOR I= 1 TO5
FOR J= 1 TO I
PRINT I;
NEXT J
NEXT I
END
OUT PUT
1
2 2
3 3 3
4 4 4 4
5 5 5 5 5
CLS
FOR I= 5 TO1 STEP-1
FOR J= 1 TO I
PRINT J;
NEXT J
NEXT I
END
OUT PUT
1 2 3 4 5
1 2 3 4
1 2 3
1 2
1
CLS
FOR I= 5 TO1 STEP-1
FOR J= 1 TO I
PRINT I;
NEXT J
NEXT I
END
OUT PUT
5 5 5 5 5
4 4 4 4
3 3 3
2 2
1
CLS
FOR I= 1 TO5
FOR J= 5 TO I STEP-1
PRINT J;
NEXT J
NEXT I
END
OUT PUT
5 4 3 2 1
5 4 3 2
5 4 3
5 4
5
CLS
FOR I= 1 TO5
FOR J= 1 TO I
PRINT I
NEXT J
NEXT I
END
OUT PUT
1 4
1 4
1
1
1
5
2
2
2
2
3
3
3
FIBROUS SERIES
CLS
A=1
B=1
PRINT A;B
FOR I= 1 TO 8
C=A+B
A=B
B=C
NEXT I
END
OUTPUT
1 1
2
3
5
8
13
21
34
55
WAO TO CHECK THET GIVEN NUMBER IS ARNSTRONG OR NOT
CLS
INPUT”ENTER THE NUMBER”;N
A=N
WHILE N<>0
R=N MOD 10
S=S+R^3
N=N/10
WEND
IF S=A THEN
PRINT”IT IS ARMSTRONG”
ELSE
PRINT”IT IS NOT ARMSTRONG”
END IF
END
WAP TO CHECK THE GIVEN NUMBER IS PRIME OR NOT
CLS
INPUT”ENTER A NUMBER”;N
FOR I= 1 TO N
IF N MOD I=0 THEN
C=C+1
END IF
NEXT I
IF C<=2 THEN
PRINT”THE NUMBER IS PRIME”
ELSE
PRINT”THE NUMBER IS NOT PRIME”
END
WAP TO INPUT A NUMBER (MULTIDIGIT) AND FIND ITS SUM
CLS
INPUT”ENTERS THE MULTIDIGIT NUMBER”; N
WHILE N MOD 10
R=N MOD 10
S=S+R
N=N/10
WEND
PRINT”THE SUMIS”; S
END
WAP TO INPUT A NUMBER (MULTIDIGIT) AND FIND ITS PRODUCT
CLS
INPUT”ENTERS THE MULTIDIGIT NUMBER”; N
S=1
WHILE N MOD 10
R=N MOD 10
S=S*R
N=N/10
WEND
PRINT”THE SUMIS”; S
END
WAP TO FIND IT’S OUTOUT
HAILSTROM PATTERN
CLS
A=7
FOR I=1 TO 5
PRINT A
IF A MOD 2<>0 THEN
A-A*3+1
ELSE
A=A/2
END IF
NEXT I
END
WAP TO PRINT THE MULTIDIGIT NUMBER IN REVERSE FORM
CLS
A=12345
WHILE A<>0
R=A MOD 10
S=S*10+R
A=A/10
WEND
PRINT S
END
OUTPUT
5
50+4
54*10
543*10
5432*10
54321
OUTPUT
54321
WAP TO PRINT THE SUM OF THE EVEN NUMBER OF THE MULTIDIGIT NUMBER
CLS
INPUT”ENTERS A MULTIDIGIT NUMBER”; N
WHILE N<>0
R=N MOD 10
IF R MOD 2=0 THEN
S=S+R
END IF
WEND
PRINT”THE SUM OF THE EVEN NUMBER”; S
END
WAP TO PRINT THE SUM OF THE ODD NUMBER OF THE MULTIDIGIT NUMBER
CLS
INPUT”ENTERS A MULTIDIGIT NUMBER”; N
WHILE N<>0
R=N MOD 10
IF R MOD 2<>0 THEN
S=S+R
END IF
WEND
PRINT”THE SUM OF THE EVEN NUMBER”; S
END
WAP TO PRINT ALL ODD NUMBER FROM 1 TO 100
CLS
A=1
B=1
WHILE B<=50
PRINT A
A=A+2
B=B+1
WEND
END
WAP TO PRINT ALL EVEN NUMBERS FROM 1 TO 100
CLS
A=2
B=1
WHILE B<=50
PRINT A
A=A+2
B=B+1
WEND
END
1,4,9,16,25
CLS
A=1
B=1
WHILE B<=5
PRINT A^2
A=A+1
B=B+1
WEND
END
1, 9, 25….10TH TERM
CLS
A=1
B=1
WHILE B<=10
PRINT A^2
A=A+2
B=B+1
WEND
END
100, 90,80,70,60
CLS
A=100
B=1
WHILE B<=5
PRINT A
A=A-10
B=B+1
WEND
END
10,9,8,7,6,5,4,3,2,1
CLS
A=10
B=1
WHILE B<=10
PRINT A
A=A-1
B=B+1
WEND
END
4,16,36,64,100
CLS
A=2
B=1
WHILE B<=5
PRINT A^2
A=A+2
B=B+1
WEND
END
1, 8, 27……..5TH TERM
CLS
A=1
B=1
WHILE B<=5
PRINT A^3
A=A+1
B=B+1
WEND
END
100, 98.5, 97, 95.5….10TH TERM
CLS
A=100
B=1
WHILE B<=10
PRINT A
A=A-1.5
B=B+1
WEND
END
3, 6, 9, 12, 15………10TH TERM
CLS
A=3
B=1
WHILE B<=10
PRINT A
A=A+3
B=B+1
WEND
END
1000,900,800,700,600
CLS
A=1000
B=1
WHILE B<=5
PRINT A
A=A-100
B=B+1
WEND
END
-5,-4,-3,-2,-1, 0, 1, 2,3,4,5
CLS
A=-5
B=1
WHILE B<=10
PRINT A
A=A+1
B=B+1
WEND
END
5, 10, 15, 20…..10TH TERM
CLS
A=5
B=1
WHILE B<=10
PRINT A
A=A+5
B=B+1
WEND
END
5, 25,125……5TH TERM
CLS
A=5
B=1
WHILE B<=5
PRINT A
A=A*5
B=B+1
WEND
END
1
11
111
1111
11111
CLS
A=1
B=1
WHILE B<=5
PRINT A
A= (A*10) +1
B=B+1
WEND
END
WAP TO GENERATE YOUR NAME TEN TIMES
CLS
A$=”AMENDRA”
B=1
WHILE B<=5
PRINT A$
B=B+1
WEND
END
10, 20,30,40,50
CLS
A=10
B=1
WHILE B<=5
PRINT A
A=A+10
B=B+1
WEND
END
-10,-5, 0,5,10
CLS
A=-10
B=1
WHILE B<=5
PRINT A
A=A+5
B=B+1
WEND
END
SUM OF ALL ODD NMBER FROM 1 TO 100
CLS
A=1
B=1
WHILE B<=50
S=S+A
A=A+1
B=B+1
WEND
PRINT”THE SUM IS”; S
END
SUM OF ALL EVEN NMBER FROM 1 TO 100
CLS
A=2
B=1
WHILE B<=50
S=S+A
A=A+2
B=B+1
WEND
PRINT”THE SUM IS”; S
END
SUM OF ALL NUMBER FROM 1 TO 100
CLS
A=1
B=1
WHILE B<=100
S=S+A
A=A+1
B=B+1
WEND
PRINT”THE SUM IS”; S
END
SUMOF SQUARE NO FROM 1 TO 5
CLS
A=1
B=1
WHILE B<=5
PRINT A^2
S=S+A^2
A=A+1
B=B+1
WEND
PRINT”THE SUM IS”; S
END
FIBROUS SERIES
CLS
A=2
B=2
D=1
PRINT A; B
WHILE D<=10
C=A+B
PRINT C
A=B
B=C
D=D+1
WEND
END
SYNTAX
DO WHILE
LOOP
DO UNTIL
LOOP
Subscribe to: Post Comments (Atom)
0 comments:
Post a Comment