Инструменты пользователя

Инструменты сайта


msx:basic_dialogue_programming_language:009

Различия

Здесь показаны различия между двумя версиями данной страницы.

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
Следующая версия
Предыдущая версия
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}}
msx/basic_dialogue_programming_language/009.1676221841.txt.gz · Последние изменения: 2023-02-12 20:10 — GreyWolf