Шпаргалка: Вопросы по информатике
FOR j = 1 TO 5
s = s + re(i, j)
NEXT j
IF s > 24 THEN : k = k + 1: PRINT k; "_______ "; fa$(i)
s = 0
NEXT i: PRINT
PRINT «Для продолжения нажмите любую клавишу»
300 IF INKEY$ = "" THEN 300
GOTO 10
400 END
Результаты работы программы
(на экране компьютера)
Список студентов
№ Ф.И.О оценки № Ф.И.О оценки
1 Абирбаев 5 5 5 5 5 14 Копбаева 3 3 3 3 3
2 Азимханов 5 4 4 5 4 15 калымханов 3 3 3 3 3
3 Алимхожаева 4 5 5 5 3 16 Каршыгабек 4 4 4 4 4
4 Баймуратова 5 5 5 5 5 17 Мукатаев 4 4 5 5 5
5 Байтугелов 5 5 5 5 5 18 Наурызбаев 4 4 4 4 4
6 Байманасов 4 5 3 3 5 19 Отеулин 4 4 4 4 4
7 Даулеталиев 4 0 5 4 5 20 Торекулов 4 4 4 3 3
8 Ержуманова 4 5 4 5 5 21 Тажиев 3 3 3 3 3
9 Жайлбаев 5 5 5 5 5 22 Тусупов 3 3 3 3 3
10 Жексенбино 5 5 5 4 3 23 Шагылбаева 3 3 3 4 4
11 Жоламанов 3 3 4 4 4 24 Калымбаева 4 4 4 4 5
12 Жанбыршиев 4 4 4 4 4 25 Бейсебаева 5 5 5 5 5
13 Каденов 4 3 3 3 3
Фамилия отличников
1 _______ Абирбаев
2 _______ Баймуратова
3 _______ Байтугелов
4 _______ Жайлбаев