₦airaland Forum

Get her a Magic Copybook with a pen holder to guide her hand coordination.

Check this post below for more information.
https://web.facebook.com/greatexglobal/videos/625811008896565/?ref=sharing&_rdc=1&_rdr

Give your business a professional makeover today. email like contactus@businessname.com will be just appropriate as most customers don't trust Businesses without Professional Emails Start by buying your .COM,.ORG,.NET now for ₦3,350. You save ₦1,900. Offer ends 30/11/2016.

Click Here to get started http://isslserv.ng/blackfriday

Xx

Xx

Xx

CLS
DIM A, B, C, D, P, F AS INTEGER
DIM total AS DOUBLE
DIM creng, crbio, crmat, crphy, creco AS DOUBLE
A = 4
B = 3.5
C = 3
D = 2.5
P = 2
F = 0

creng = 4!
crbio = 4!
crmat = 4!
crphy = 2!
creco = 3!
total = 17!

INPUT "Enter your grade in English: ", eng$

IF eng$ = "A" THEN
engtot# = creng * A
ELSEIF eng$ = "B" THEN
engtot# = creng * B
ELSEIF eng$ = "C" THEN
engtot# = creng * C
ELSEIF eng$ = "" THEN
engtot# = creng * D
ELSEIF eng$ = "P" THEN
engtot# = creng * P
ELSEIF eng$ = "F" THEN
engtot# = creng * F
ELSE
PRINT "Invalid grade"
END IF
PRINT "Total for English: "; engtot#


INPUT "Enter your grade in Biology: ", bio$

IF bio$ = "A" THEN
biotot# = crbio * A
ELSEIF bio$ = "B" THEN
biotot# = crbio * B
ELSEIF bio$ = "C" THEN
biotot# = crbio * C
ELSEIF bio$ = "" THEN
biotot# = crbio * D
ELSEIF bio$ = "P" THEN
biotot# = crbio * P
ELSEIF bio$ = "F" THEN
biotot# = crbio * F
ELSE
PRINT "Invalid grade"
END IF
PRINT "Total for Biology: "; biotot#


INPUT "Enter your grade in Maths: ", mat$

IF mat$ = "A" THEN
mattot# = crmat * A
ELSEIF mat$ = "B" THEN
mattot# = crmat * B
ELSEIF mat$ = "C" THEN
mattot# = crmat * C
ELSEIF mat$ = "" THEN
mattot# = crmat * D
ELSEIF mat$ = "P" THEN
mattot# = crmat * P
ELSEIF mat$ = "F" THEN
mattot# = crmat * F
ELSE
PRINT "Invalid grade"
END IF
PRINT "Total for Maths: "; mattot#


INPUT "Enter your grade in Physics: ", phy$

IF phy$ = "A" THEN
phytot# = crphy * A
ELSEIF phy$ = "B" THEN
phytot# = crphy * B
ELSEIF phy$ = "C" THEN
phytot# = crphy * C
ELSEIF phy$ = "" THEN
phytot# = crphy * D
ELSEIF phy$ = "P" THEN
phytot# = crphy * P
ELSEIF phy$ = "F" THEN
phytot# = crphy * F
ELSE
PRINT "Invalid grade"
END IF
PRINT "Total for Physics: "; phytot#



INPUT "Enter your grade in Economics ", eco$

IF eco$ = "A" THEN
ecotot# = creco * A
ELSEIF eco$ = "B" THEN
ecotot# = creco * B
ELSEIF eco$ = "C" THEN
ecotot# = creco * C
ELSEIF eco$ = "" THEN
ecotot# = creco * D
ELSEIF eco$ = "P" THEN
ecotot# = creco * P
ELSEIF eco$ = "F" THEN
ecotot# = creco * F
ELSE
PRINT "Invalid grade"
END IF
PRINT "Total for Economics: "; ecotot#

cum# = engtot# + biotot# + mattot# + phytot# + ecotot#

gpa# = cum# / total
PRINT "Your cumulative point is:"; cum#
PRINT "Your total Course Load is:"; total
PRINT "Your GPA is: "; gpa#
END


#########################################
RESULT
#########################################


Press any key to continueEnter your grade in English: A
Total for English: 16
Enter your grade in Biology: B
Total for Biology: 14
Enter your grade in Maths: C
Total for Maths: 12
Enter your grade in Physics: P
Total for Physics: 4
Enter your grade in Economics D
Total for Economics: 7.5
Your cumulative point is: 53.5
Your total Course Load is: 17
Your GPA is: 3.147058823529412











Press any key to continue

Xx

..

Xx