1.WHILE n$<> “End”
2.m4= (m1+m2+m3)/3
3.READ n$, m1, m2, m3
4.t1 = t1+m1
5.IF m4 < 50 THEN
6. s$ = “FAIL”
7.ELSE
8. s$ = “PASS”
9.ENDIF
10.PRINT n$, m4, s$
11.READ n$, m1, m2, m3
12.WEND
13.PRINT “Maths”, “Eng”, “Bang”
14.PRINT t1/4, t2/2, t3/3
15.END
DATA “Nader”, 60, 40, 47
DATA “Amirah”, 70, 50, 60
DATA “Aseal”, 80, 73, 60
DATA “End”, -1, -1, -1
Line |
N$ |
M1 |
M2 |
M3 |
Is n$ <> End |
M4 |
T1 |
T2 |
T3 |
Is m4<50 |
S$ |
Output |
1 |
|
|
|
|
Yes |
|
|
|
|
|
|
|
2 |
|
|
|
|
|
0 |
|
|
|
|
|
|
3 |
Nader |
60 |
40 |
47 |
|
|
|
|
|
|
|
|
4 |
|
|
|
|
|
|
60 |
|
|
|
|
|
5 |
|
|
|
|
|
|
|
|
|
Yes |
|
|
6 |
|
|
|
|
|
|
|
|
|
|
Fail |
|
10 |
|
|
|
|
|
|
|
|
|
|
|
Nader,0, Fail |
11 |
Amirah |
70 |
50 |
60 |
|
|
|
|
|
|
|
|
1 |
Amirah |
|
|
|
Yes |
|
|
|
|
|
|
|
2 |
|
|
|
|
|
60 |
|
|
|
|
|
|
3 |
Aseal |
80 |
73 |
60 |
|
|
|
|
|
|
|
|
4 |
|
|
|
|
|
|
140 |
|
|
|
|
|
5 |
|
|
|
|
|
|
|
|
|
No |
|
|
8 |
|
|
|
|
|
|
|
|
|
|
Pass |
|
10 |
|
|
|
|
|
|
|
|
|
|
|
Aseal,60, pass |
11 |
End |
-1 |
-1 |
-1 |
|
|
|
|
|
|
|
|
1 |
End |
|
|
|
No |
|
|
|
|
|
|
|
13 |
|
|
|
|
|
|
|
|
|
|
|
Math, Eng, Bang |
14 |
|
|
|
|
|
|
|
|
|
|
|
35,0,0 |
|
|
|
|
|
|
STOP |
|
|
|
|
|
|
0 Comments