Здесь показаны различия между двумя версиями данной страницы.
Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
msx:basic_dialogue_programming_language:009 [2023-02-12 20:10] GreyWolf |
msx:basic_dialogue_programming_language:009 [2023-02-19 16:22] (текущий) GreyWolf |
||
---|---|---|---|
Строка 6: | Строка 6: | ||
<WRAP group 99%> | <WRAP group 99%> | ||
<WRAP half column> \\ </WRAP> | <WRAP half column> \\ </WRAP> | ||
- | <WRAP half column><WRAP justify> | + | <WRAP half column><WRAP right> |
//Файл// (от англ. file — досье, картотека), набор данных,— \\ | //Файл// (от англ. file — досье, картотека), набор данных,— \\ | ||
1) совокупность упорядоченных и взаимосвязанных записей, имеющая описание для идентификации отдельных записей; \\ | 1) совокупность упорядоченных и взаимосвязанных записей, имеющая описание для идентификации отдельных записей; \\ | ||
Строка 301: | Строка 301: | ||
<WRAP group 99%> | <WRAP group 99%> | ||
<WRAP half column> \\ </WRAP> | <WRAP half column> \\ </WRAP> | ||
- | <WRAP half column><WRAP justify> | + | <WRAP half column><WRAP right> |
Старейшим из дошедших до нас каталогов признается список литературных произведений на шумерской глиняной плитке, относящейся к 2000 г. до н.э.. | Старейшим из дошедших до нас каталогов признается список литературных произведений на шумерской глиняной плитке, относящейся к 2000 г. до н.э.. | ||
<WRAP rightalign> | <WRAP rightalign> | ||
Строка 745: | Строка 745: | ||
<WRAP group 99%> | <WRAP group 99%> | ||
<WRAP half column> \\ </WRAP> | <WRAP half column> \\ </WRAP> | ||
- | <WRAP half column><WRAP justify> | + | <WRAP half column><WRAP right> |
Я знаю, что положил это в надёжное место, но теперь не могу вспомнить, в какое именно! | Я знаю, что положил это в надёжное место, но теперь не могу вспомнить, в какое именно! | ||
<WRAP rightalign> | <WRAP rightalign> | ||
Строка 790: | Строка 790: | ||
==== IX.2.1. Контрольные буферы файлов ==== | ==== IX.2.1. Контрольные буферы файлов ==== | ||
- | {{anchor:maxfiles}} | + | {{anchor:maxfiles1}} |
Оператор | Оператор | ||
<WRAP group> | <WRAP group> | ||
Строка 1573: | Строка 1573: | ||
75 INPUT "Введите количество учащихся";N | 75 INPUT "Введите количество учащихся";N | ||
80 FOR I=1 TO N | 80 FOR I=1 TO N | ||
- | 90 INPUT "Ф.И.";D$:LSET I$=D$:INPUT "Тема1";D$:LSET T1$=D$:INPUT"Балл";D%:LSET O1$=MKI$(D%):INPUT "Тема2";D$:LSET T2$=D$:INPUT "Балл";D%:LSET O2$=MKI$(D%):PUT#1,I | + | 90 INPUT "Ф.И.";D$:LSET I$=D$:INPUT "Тема1";D$:LSET T1$=D$:INPUT"Балл";D%: |
+ | LSET O1$=MKI$(D%):INPUT "Тема2";D$:LSET T2$=D$: | ||
+ | INPUT "Балл";D%:LSET O2$=MKI$(D%):PUT#1,I | ||
110 NEXT:A=0 'A - количество учеников, у которых средний балл по 'двум темам ≥ 4 | 110 NEXT:A=0 'A - количество учеников, у которых средний балл по 'двум темам ≥ 4 | ||
120 FOR K=1 TO N:GET#1,K 'Заполнение файла #2 | 120 FOR K=1 TO N:GET#1,K 'Заполнение файла #2 | ||
Строка 1584: | Строка 1586: | ||
175 FOR K=1 TO N 'Заполнение файла #3 | 175 FOR K=1 TO N 'Заполнение файла #3 | ||
177 GET #1,K | 177 GET #1,K | ||
- | 180 IF CVI(O1$)=4 OR CVI(O1$)=5 OR CVI(O2$)=4 OR CVI(O2$)=5 THEN LSET F1$=I$:B=B+1:PUT #3,B | + | 180 IF CVI(O1$)=4 OR CVI(O1$)=5 OR CVI(O2$)=4 OR CVI(O2$)=5 THEN |
+ | LSET F1$=I$:B=B+1:PUT #3,B | ||
190 NEXT K | 190 NEXT K | ||
195 PRINT"Ф.И. успевающих" | 195 PRINT"Ф.И. успевающих" | ||
Строка 1629: | Строка 1632: | ||
==== IX.3.1. Оператор MAXFILES=, OPEN и CLOSE ==== | ==== IX.3.1. Оператор MAXFILES=, OPEN и CLOSE ==== | ||
- | {{anchor:maxfiles1}} | + | {{anchor:maxfiles}} |
- | Перемещение логических строк последовательных файлов из оперативной памяти на дискету и в обратном направлении производится через //контрольные буферы файлов//. Последние объявляются оператором ''[[09#maxfiles|MAXFILES=]]''. Максимальное количество файлов, которые могут быть открыты одновременно, устанавливается оператором | + | Перемещение логических строк последовательных файлов из оперативной памяти на дискету и в обратном направлении производится через //контрольные буферы файлов//. Последние объявляются оператором ''[[009#maxfiles|MAXFILES=]]''. Максимальное количество файлов, которые могут быть открыты одновременно, устанавливается оператором |
<WRAP group> | <WRAP group> | ||
<WRAP half column> | <WRAP half column> | ||
Строка 1652: | Строка 1655: | ||
Учтите,что при использовании оператора ''MAXFILES='' автоматически выполняется оператор ''[[010#clear|CLEAR]]'', но если Вы используете в программе оба оператора, то располагайте оператор ''MAXFILES='' вслед за оператором ''[[010#clear|CLEAR]]''. | Учтите,что при использовании оператора ''MAXFILES='' автоматически выполняется оператор ''[[010#clear|CLEAR]]'', но если Вы используете в программе оба оператора, то располагайте оператор ''MAXFILES='' вслед за оператором ''[[010#clear|CLEAR]]''. | ||
+ | {{anchor:open_for}} | ||
Вам, конечно же, ясно, что перед использованием файла Вы должны объявить его //открытым//. Открытие файла осуществляется оператором ''OPEN'', в котором задаётся: | Вам, конечно же, ясно, что перед использованием файла Вы должны объявить его //открытым//. Открытие файла осуществляется оператором ''OPEN'', в котором задаётся: | ||
* имя устройства (''A:'', ''B:'', ''MEM:'', ''CAS:'', ''CRT:'', ''GRP:'', ''LPT:'', ''COM:''); | * имя устройства (''A:'', ''B:'', ''MEM:'', ''CAS:'', ''CRT:'', ''GRP:'', ''LPT:'', ''COM:''); | ||
Строка 1762: | Строка 1766: | ||
<WRAP group 99%> | <WRAP group 99%> | ||
<WRAP half column> \\ </WRAP> | <WRAP half column> \\ </WRAP> | ||
- | <WRAP half column><WRAP justify> | + | <WRAP half column><WRAP right> |
Да,— повторял он себе,— если бы на борту "Пилигрима" я знал все, что должен знать настоящий моряк, сколько несчастий можно было бы избежать! | Да,— повторял он себе,— если бы на борту "Пилигрима" я знал все, что должен знать настоящий моряк, сколько несчастий можно было бы избежать! | ||
<WRAP rightalign> | <WRAP rightalign> | ||
Строка 2667: | Строка 2671: | ||
<WRAP group 99%> | <WRAP group 99%> | ||
<WRAP half column> \\ </WRAP> | <WRAP half column> \\ </WRAP> | ||
- | <WRAP half column><WRAP justify> | + | <WRAP half column><WRAP right> |
RAMdisk (псевдодиск) — логическое устройство, обеспечивающее хранение файлов в специально выделенной области оперативной памяти.Используется на микроЭВМ и ПЭВМ. | RAMdisk (псевдодиск) — логическое устройство, обеспечивающее хранение файлов в специально выделенной области оперативной памяти.Используется на микроЭВМ и ПЭВМ. | ||
<WRAP rightalign> | <WRAP rightalign> | ||
Строка 2912: | Строка 2916: | ||
FIXME | FIXME | ||
- | В этом пункте описаны команды ''[[09#save2|SAVE]]'', ''[[09#load2|LOAD]]'', ''[[09#merge2|MERGE]]'', ''[[09#run2|RUN]]''. | + | В этом пункте описаны команды ''[[009#save2|SAVE]]'', ''[[009#load2|LOAD]]'', ''[[009#merge2|MERGE]]'', ''[[009#run2|RUN]]''. |
{{anchor:save2}} | {{anchor:save2}} |