Задания №1
В чем состоят особенности организации пакетного режима работы ЭВМ, режима разделения времени и режимареального времени?
ОТВЕТ:
Особенность пакетного режимаработы ЭВМ состоят в том что, одновременно могут работать, сразу несколько программне зависимо друг — друга. Количество программы, которая работает одновременно,указывается пользователем в файле CONFIG.SYS. Режим разделения времени назначается процессором.Процессор разделяет время между работающими программами и устройствами. Промежутокэтого времени так мало, что пользователь не замечает, ему кажется, что устройства работает параллельно. Сущностьрежима реального времени в том, что в это время устройства работает с своейскоростью. (Работа дискета, печать, сканирования и т.д.)
Задания №2
Сформироватьфайл, содержащий результаты сессии студентов одной группы в виде матрицы вкаждой строке, которой хранятся результаты сессии (пять экзаменов) для одногостудента. В группе 25 студентов, ихфамилии хранятся в отдельном файле. Используя сформированный файл, вывести наэкран фамилии отличников.
ОТВЕТ:
10 CLS: DIM fa$(25), re(25, 5)
PRINT: PRINT"###################### работает программа: РЗУЛЬТАТЫСЕССЫ##############": PRINT
PRINT «1. Создания файла дляфамилий»
PRINT «2. Создания файла длярезультатов сессий»
PRINT «3. Просмотр результатовсессий»
PRINT «4. END»: PRINT
11 INPUT «Введите порядокработы:»; n: IF n > 4 OR n
ON n GOTO fem, rez, otl, 400
fem: CLS: PRINT «1. Создания файладля фамилий »: PRINT: PRINT
PRINT «Введите фамилий студентов поодному на строке:»
OPEN «fam» FOR OUTPUT AS #1
FOR i = 1 TO 25: INPUT fa$(i): NEXT i
FOR i = 1 TO 25: PRINT #1, fa$(i): NEXT i
FOR i = 1 TO 25: PRINT fa$(i): NEXT i
CLOSE
PRINT «Файл для фамилий создан»
LOCATE 24, 1: PRINT «Для продолжениянажмите любую клавишу»
110 IF INKEY$ = "" THEN 110
GOTO 10
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
LOCATE z + 1, x + 1: PRINT i; fa$(i);
LOCATE z + 1, x + 15
FOR j = 1 TO 5
PRINT re(i, j);
NEXT j
PRINT
NEXT i
PRINT :
PRINT " ” Отличники: ": s = 0: k = 0
FOR i = 1 TO 25
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 _______ Жайлбаев
5 _______Бейсебаева
для продолжения нажмите любую клавишу
Файл результатов: (для тестирования программы)
Имя файла: rez
5 5 5 5 5
5 4 4 5 4
4 5 5 5 3
5 5 5 5 5
5 5 5 5 5
4 5 3 3 5
4 5 5 4 5
4 5 4 5 5
5 5 5 5 5
5 5 5 4 3
3 3 4 4 4
4 4 4 4 4
4 3 3 3 3
3 3 3 3 3
3 3 3 3 3
4 4 4 4 4
4 4 5 5 5
4 4 4 4 4
4 4 4 4 4
4 4 4 3 3
3 3 3 3 3
3 3 3 3 3
3 3 3 4 4
4 4 4 4 5
5 5 5 5 5
Файл для фамилии:(длятестирования программы)
Имя файла: fam
1 Абирбаев
2 Азимханов
3 Алимхожаева
4 Баймуратова
5 Байтугелов
6 Байманасов
7 Даулеталиев
8 Ержуманова
9 Жайлбаев
10 Жексенбино
11 Жоламанов
12 Жанбыршиев
13 Каденов
14 Копбаева
15 калымханов
16 Каршыгабек
17 Мукатаев
18 Наурызбаев
19 Отеулин
20 Торекулов
21 Тажиев
22 Тусупов
23 Шагылбаева
24 Калымбаева
25 Бейсебаева
Литературы:
1. В. Э. Фигурнов. «IBM PC для пользователя.» 7-еиздания М-1997
2. СимашковА. С. и др. «Специальная информатика». Москва-1999
3. Г. И. Светозарова и др. «Практикум по програмированию на языке Бейсик». М. Наука-1983.