Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  Hw6_2
Language: PASCAL
Code:
Program hw6_2;
Var mark:integer;
Begin
Write('Input a mark :');
readln(mark);
If begin mark<50 then writeln('Work harder!')
     writeln('You fail the examination.');
End;
Else writeln('Congratulations!)
     writeln('You pass the examination.');
End.
Comments: