 |
 |
 |
 |
|
 |
 |
118
Сидоров
Алеша
5
3
3
проходной балл =? 14
Правильные результаты:
отличники:
отсутствуют
не меньше проходного:
отсутствуют.
В приведенных тестах анализируются различные логические ситуации с отсутствием «от-
личников» или «успешно» сдавших экзамены. При составлении программы эти ситуации можно
явно предусмотреть в сценарии диалога с ЭВМ:
Сценарий
оценки учащихся:
<фам> <имя> <мат> <инф> <язык> *
………………………………….
проходной балл=? <b1>
отличники:
<фам> <имя> *
……………
отсутствуют
не меньше проходного:
<фам> <имя> <sum> *
……………..
отсутствуют
Программа
Алгоритм
' результаты экзаменов
алг «результаты экзаменов»
cls
нач
? «оценки учащихся:»
вывод («оценки учащихся:»)
do
цикл
read fm$, nm$, mt, in, zk
ввод fm$, nm$, mt, in, zk
if fm$ = «» then exit do
если fm$ = «» то выход
? fm$, nm$, mt, in, zk
вывод (fm$, nm$, mt, in, zk)
loop
кцикл
input «проходной балл=»,b1
запрос («проходной балл=»,b1)
restore ocenki
перезагрузка_ oценки
? «отличники:»
вывод («отличники:»)
n = 0
п = 0
do
цикл
read fm$, nm$, mt, in, zk
ввод fm$, nm$, mt, in, zk
if fm$ = «» then exit do
если fm$ = «» то выход
if mt=5 and in=5 and zk=5 then
если mt=5 и in = 5 и zk=5 то
? fin$, nm$
вывод (fm$, nm$)
n = n + 1
n = n + 1
end if
кесли
loop
кцикл
if n=0 then ? «отсутствуют»
если п=0 то вывод(«отсутствуют»)
restore ocenki
перезагрузка-оценок
? «не меньше проходного:»
вывод («не меньше проходного:»)
n = 0
п = 0
do
цикл