Вопросы по информатике
Категория реферата: Рефераты по информатике, программированию
Теги реферата: сочинение егэ, сочинение рассказ
Добавил(а) на сайт: Казак.
Предыдущая страница реферата | 1 2 3 4 5 | Следующая страница реферата
rez: CLS : PRINT "2. Создания файла для результатов сессий ": PRINT : PRINT
PRINT " Введите результаты сессий по одному на строке "
OPEN "rez" FOR OUTPUT AS #1
FOR j = 1 TO 25
FOR i = 1 TO 5
INPUT re(j, i): PRINT #1, re(j, i)
NEXT i, j
CLOSE
PRINT «Файл для результатов создан»
LOCATE 24, 1: PRINT «Для продолжения нажмите любую клавишу»
210 IF INKEY$ = "" THEN 210
GOTO 10
otl: CLS
OPEN "fam" FOR INPUT AS #1
OPEN "rez" FOR INPUT AS #2
FOR i = 1 TO 25: INPUT #1, fa$(i): NEXT i
FOR i = 1 TO 25
FOR j = 1 TO 5
INPUT #2, re(i, j)
NEXT j, i
CLOSE
CLS : x = 0: z = 1: PRINT " Список студентов"
PRINT " № Ф,И,О оценки № Ф,И,О оценки "
FOR i = 1 TO 25
z = z + 1: IF z > 14 THEN z = 2: x = x + 30
Рекомендуем скачать другие рефераты по теме: реферат,, понятие культуры.
Предыдущая страница реферата | 1 2 3 4 5 | Следующая страница реферата