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
Смотрите видео Pascal Program for FindGrade | Created by My Student, Mr. Hamdhy онлайн без регистрации, длительностью часов минут секунд в хорошем качестве. Это видео добавил пользователь JMA Pro 18 Март 2024, не забудьте поделиться им ссылкой с друзьями и знакомыми, на нашем сайте его посмотрели 5 раз и оно понравилось людям.