Ask a New Question
Search
Questions and answers by
Alves
Answers (1)
program quiz_1; label xy; var StudentName:string; ExamScore:integer; TotalExamScore:integer; TotalStudent:integer; average:real; ans:char; begin TotalStudent := 0; TotalExamScore := 0; xy: write('Please enter StudentName: '); readln(StudentName);