Опишите ,используя структуру записи ,вступительные экзамены , на которых абитуриенты сдавали три экзамена , а для поступления надо было набрать 12 баллов . Составьте программу ,считывающую с клавиатуры результаты всех вступительных экзаменов и выводящую на экран следующую информацию:- QBasic(Бейсик)

А) список абитуриентов ,сдавших все три экзамена на 5
Б) список абитуриентов ,потерпевших неудачу на экзаменах
В) список абитуриентов , зачисленных в институт .

TYPE EntranceExam
    name AS STRING * 20
    exam1 AS INTEGER
    exam2 AS INTEGER
    exam3 AS INTEGER
END TYPE

DIM applicant AS EntranceExam
INPUT "Введите имя абитуриента: ", applicant.name
INPUT "Введите результаты по экзаменам: ", applicant.exam1, applicant.exam2, applicant.exam3
totalScore = applicant.exam1 + applicant.exam2 + applicant.exam3

IF totalScore >= 12 THEN
    PRINT "Абитуриент зачислен в институт: "; applicant.name
ELSE
    PRINT "Абитуриент не зачислен в институт: "; applicant.name
END IF

IF applicant.exam1 = 5 AND applicant.exam2 = 5 AND applicant.exam3 = 5 THEN
    PRINT "Абитуриент сдал все экзамены на 5: "; applicant.name
ELSE
    PRINT "Абитуриент не сдал все экзамены на 5: "; applicant.name
END IF