REM Suky Sangha
REM NAME_CON_EARN.BAS

DIM nameinput  AS STRING
DIM earnings, contribution AS SINGLE
DIM contrib AS SINGLE
FOR a = 1 TO 3
    PRINT "Please enter Name"
    INPUT nameinput
    PRINT "Please enter your earnings"
    INPUT earningsinput
    contribution = earningsinput / 10
    PRINT nameinput; ","
    PRINT "Your Earnings are:"; earningsinput, "Your Contribution is:"; contribution;
NEXT a