This code calculates a student's grade based on their marks.
Pascal Code:
--------------------------------------------------------------------------
program FindGrade(input,output);
var
Marks: integer;
Grade: char;
begin
writeln('Enter Marks');
readln(Marks);
case Marks of
0..34: Grade := 'W';
35..49: Grade := 'S';
50..64: Grade := 'C';
65..74: Grade := 'B';
75..100: Grade := 'A';
else
writeln('Invalid Marks');
end;
if (Marks "greater than"= 0) AND (Marks "less than"= 100) then
writeln('Grade is ', Grade);
end.
--------------------------------------------------------------------------
#Pascal #Programming #PascalTutorial #GCE_OL #GradeCalculation #StudentProject
Watch video Pascal Program for FindGrade | Created by My Student, Mr. Hamdhy online without registration, duration hours minute second in high quality. This video was added by user JMA Pro 18 March 2024, don't forget to share it with your friends and acquaintances, it has been viewed on our site 5 once and liked it people.