Question i need help in a simple pascal program

Jun 18, 2020
1
0
10
0
Program Bulletin ;
Uses Wincrt ;
Var moy : integer ;
Begin
Write ('marks : ') ; Readln (moy) ;
if 18 <moy then writeln ('Excellent')
else if 16 < moy < 18 then writeln ('very good');
else if 14 < moy < 16 then writeln ('good');
else if 12 < moy < 14 then writeln ('above average')
else if 0 < moy < 12 then writeln ('Passable')
else writeln (' F')
end.

Incompatible types: got boolean expeted longint
 
Thread starter Similar threads Forum Replies Date
S Apps General Discussion 5
A Apps General Discussion 2
P Apps General Discussion 2
G Apps General Discussion 0
gigaman Apps General Discussion 1
B Apps General Discussion 6
drjackool Apps General Discussion 5
G Apps General Discussion 4
S Apps General Discussion 2
Achint2000 Apps General Discussion 4
J Apps General Discussion 2
C Apps General Discussion 3
Pimpom Apps General Discussion 5
D Apps General Discussion 1
P Apps General Discussion 1
P Apps General Discussion 6
T Apps General Discussion 1
giantbucket Apps General Discussion 2
L Apps General Discussion 1
V Apps General Discussion 8

ASK THE COMMUNITY