В файле найти строки длиной 3 символа, записать их в новый файл (путь к файлу вводить вручную)

@adam1105 · Регистрация: 01.12.2016

Студворк — интернет-сервис помощи студентам

Я пока сделала запись из исходного файла в память(но мне кажется,что есть ошибки,не могли бы вы проверить пожалуйста,а то у самой пока возможности нет),если все верно то продолжу делать уже из памяти в новый файл
Спасибо за внимание

Assembler
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
.386
dseg segment use16 
roadwas db 'h:\assembler8\read.txt',0             ; путь к первоначальному файлу 
text db 49 dup (?),'$'                            ; массив для записи символов из файла в память
mytext db 18 dup (?),0Dh,0Ah,'$'                  ; массив для записи строк из трех символов
kom2 db 0Dh,0Ah,'$'
prigl db 0Dh,0Ah,'Pokskazhite dorohy k failu:',0Dh,0Ah,'$'
vv1 db 50,51 dup (?);Для пути к файлу
str1  dw ?                                        ;счет символов
kom3 db 0Dh,0Ah,'*******Oshibka otkritiya*****','$'
 
 
 
 
dseg ends
cseg segment use16
assume cs:cseg, ds:dseg
       s5: 
;открытие файла
       mov dx,dseg
           mov ds,dx
           mov ah,9
        lea dx,prigl ;приглошение на ввод пути к файлу
        int 21h
        mov ah,0Ah
        lea dx,vv1; ввод пути файла
        int 21h
        mov ah,9
        lea dx,kom2
        int 21h 
        movzx bp, byte ptr  ds:vv1+1
        lea si,vv1
        mov byte ptr ds:[si+2+bp],0
        mov al,2
        mov ah,3Dh
        lea dx,ds:vv1+2
    mov si,0
       int 21h
       jc short error                         ; ошибка создания файла (CF=1)
       mov ah,3Dh
       mov bx,ax                              ;логич. номер файла в bx
           lea dx,ds:text[si]                            ;арес размещения байт
           mov cx,1                               ;количество считываемых байт
;считывание из файла
       r1: mov ah,3Fh                             ;функция чтения
           int 21h      
       c2: cmp ax,0                               ;проверка на конец файла
           je finish1                             ; если конец, то переход на закрытие файла   
           cmp ds:text,0Ah                        ;текущий символ равен 0a?
       jne short d1                           ;если нет, то читаем дальше
           inc si
       inc byte ptr ds:str1
           jmp short r1
 
       d1: cmp ds:str1,5
       jne short q1
       mov bp,-5
       c1: mov bl,ds:text[si+bp]
       lea di,ds:mytext
       mov ds:[di],bl
       inc di
       inc bp
       cmp bp,o
       jne short c1
       q1: inc si
       mov ds:str1,0
           jmp short c2
      
           
 
           
                              
           
       
 
           
 
    error: mov ah,9
           lea dx,kom3
           int 21h
           jmp short n5
 
 finish1:    mov ah,4ch
              int 21h
 
 
       n5:    mov ah,4ch
              int 21h
 
 
 
 
 
           mov ah,4ch
      int 21h
 cseg ends
 end s5

а вот,то что у меня в исходном файле
123
ascxwqsa
1wasd
kkk
saks
asssas
safn
ghj
888
k8j
hshasj
hsz

Добавлено через 9 минут
я здесь сначала все из файла в память переписываю,а затем только строчки ,в которых три символа(ну стараюсь выполнить то ,что я написала=))

Добавлено через 1 час 53 минуты
я вот здесь исправила некоторые ошибки,но не понимаю,почему у меня из файла в память все в один байт записывается=(

Assembler
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
.386
dseg segment use16 
text db 85 dup (?),'$'                            ; массив для записи символов из файла в память
mytext db 30 dup (?),0Dh,0Ah,'$'                  ; массив для записи строк из трех символов
kom2 db 0Dh,0Ah,'$'
prigl db 0Dh,0Ah,'Pokskazhite dorohy k failu:',0Dh,0Ah,'$'
vv1 db 50,51 dup (?);Для пути к файлу
str1  dw ?                                        ;счет символов
kom3 db 0Dh,0Ah,'*******Oshibka otkritiya*****','$'
 
 
 
 
dseg ends
cseg segment use16
assume cs:cseg, ds:dseg
       s5: 
;открытие файла
       mov dx,dseg
           mov ds,dx
           mov ah,9
        lea dx,prigl ;приглошение на ввод пути к файлу
        int 21h
        mov ah,0Ah
        lea dx,vv1; ввод пути файла
        int 21h
        mov ah,9
        lea dx,kom2
        int 21h 
        movzx bp, byte ptr  ds:vv1+1
        lea si,vv1
        mov byte ptr ds:[si+2+bp],0
        mov al,2
        mov ah,3Dh
        lea dx,ds:vv1+2
    mov si,0
       int 21h
       jc short error                         ; ошибка создания файла (CF=1)
       mov bx,ax                              ;логич. номер файла в bx
           lea dx,ds:text[si]                            ;арес размещения байт
           mov cx,1                               ;количество считываемых байт
;считывание из файла
       r1: mov ah,3Fh                             ;функция чтения
           int 21h      
       c2: cmp ax,0                               ;проверка на конец файла
           je finish1                             ; если конец, то переход на закрытие файла   
           cmp ds:text,0Ah                        ;текущий символ равен 0a?
       je short d1                           ;если нет, то читаем дальше
           inc si
       inc byte ptr ds:str1
           jmp short r1
 
       d1: cmp ds:str1,5
       jne short q1
       mov bp,-5
       c1: mov bl,ds:text[si+bp]
       lea di,ds:mytext
       mov ds:[di],bl
       inc di
       inc bp
       cmp bp,0
       jne short c1
       q1: inc si
       mov ds:str1,0
           jmp short r1
      
           
 
           
                              
           
       
 
           
 
    error: mov ah,9
           lea dx,kom3
           int 21h
           jmp short n5
 
    finish1:mov ah,4ch
              int 21h
 
       n5:    mov ah,4ch
              int 21h
 
 
 
 
 
           mov ah,4ch
      int 21h
 cseg ends
 end s5

Добавлено через 29 минут
еще нашла пару ошибок , но он не как не хочет прыгать на d1 не пойму почему

Assembler
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
.386
dseg segment use16 
text db 85 dup (?),'$'                            ; массив для записи символов из файла в память
mytext db 30 dup (?),0Dh,0Ah,'$'                  ; массив для записи строк из трех символов
kom2 db 0Dh,0Ah,'$'
prigl db 0Dh,0Ah,'Pokskazhite dorohy k failu:',0Dh,0Ah,'$'
vv1 db 50,51 dup (?);Для пути к файлу
str1  dw ?                                        ;счет символов
kom3 db 0Dh,0Ah,'*******Oshibka otkritiya*****','$'
 
 
 
 
dseg ends
cseg segment use16
assume cs:cseg, ds:dseg
       s5: 
;открытие файла
       mov dx,dseg
           mov ds,dx
           mov ah,9
        lea dx,prigl ;приглошение на ввод пути к файлу
        int 21h
        mov ah,0Ah
        lea dx,vv1; ввод пути файла
        int 21h
        mov ah,9
        lea dx,kom2
        int 21h 
        movzx bp, byte ptr  ds:vv1+1
        lea si,vv1
        mov byte ptr ds:[si+2+bp],0
        mov al,2
        mov ah,3Dh
        lea dx,ds:vv1+2
    mov si,0
       int 21h
       jc short error                         ; ошибка создания файла (CF=1)
       mov bx,ax                              ;логич. номер файла в bx
           mov cx,1                               ;количество считываемых байт
       r1: lea dx,ds:text[si]                            ;арес размещения байт
           
;считывание из файла
        mov ah,3Fh                             ;функция чтения
           int 21h      
       c2: cmp ax,0                               ;проверка на конец файла
           je finish1                             ; если конец, то переход на закрытие файла   
           cmp byte ptr ds:text[si],0Ah                        ;текущий символ равен 0a?
       je short d1                           ;если нет, то читаем дальше
           inc si
       inc byte ptr ds:str1
           jmp short r1
 
       d1: cmp ds:str1,5
       jne short q1
       mov bp,-5
       c1: mov bl,ds:text[si+bp]
       lea di,ds:mytext
       mov ds:[di],bl
       inc di
       inc bp
       cmp bp,0
       jne short c1
       q1: inc si
       mov ds:str1,0
           jmp short r1
      
           
 
           
                              
           
       
 
           
 
    error: mov ah,9
           lea dx,kom3
           int 21h
           jmp short n5
 
    finish1:mov ah,4ch
              int 21h
 
       n5:    mov ah,4ch
              int 21h
 
 
 
 
 
           mov ah,4ch
      int 21h
 cseg ends
 end s5

ФедосеевПавел · 04.06.2017, 23:23

adam1105, вы сможете разобраться с чтением из файла при помощи промежуточной абстракции - ведь к ней вы потихоньку и подходите?
Чтение из файла, перевод строки в число

Там идея в следующем. Открывается текстовый файл и из него прослойка считывает несколько килобайт в буфер (можно сократить размер буфера до 10 байт). Программа запрашивает через процедуру чтение одного байта, и если буфер ещё полон - чтение из буфера, если буфер опустошён - заполнение буфера из файла и чтение из буфера.

А уже потом анализ этих считанных байт на строки и прочее.

Добавлено через 8 минут
Или, если позволено условием задачи, можно принять, что буфер больше размера файла. Тогда считать в буфер и обработать текст в буфере.

@adam1105 · 05.06.2017, 20:35 **[ТС]**

ФедосеевПавел, так ,как я задумывала ,я вроде сделала,вот

Assembler
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
.386
dseg segment use16 
text db 85 dup (?),'$'                            ; массив для записи символов из файла в память
mytext db 30 dup (?),0Dh,0Ah,'$'                  ; массив для записи строк из трех символов
kom2 db 0Dh,0Ah,'$'
prigl db 0Dh,0Ah,'Pokskazhite dorohy k failu:',0Dh,0Ah,'$'
vv1 db 50,51 dup (?);Для пути к файлу
str1  dw ?                                        ;счет символов
kom3 db 0Dh,0Ah,'*******Oshibka otkritiya*****','$'
 
 
pathname db 'c:\read2.asm',0 ; путь к файлу
handle dw ?                      ;для лог номера
str2 db ?
 
 
dseg ends
cseg segment use16
assume cs:cseg, ds:dseg
       s5: 
;открытие файла
       mov dx,dseg
           mov ds,dx
           mov ah,9
        lea dx,prigl ;приглошение на ввод пути к файлу
        int 21h
        mov ah,0Ah
        lea dx,vv1; ввод пути файла
        int 21h
        mov ah,9
        lea dx,kom2
        int 21h 
        movzx bp, byte ptr  ds:vv1+1
        lea si,vv1
        mov byte ptr ds:[si+2+bp],0
        mov al,2
        mov ah,3Dh
        lea dx,ds:vv1+2
    mov si,0
       int 21h
       jc  error                         ; ошибка создания файла (CF=1)
       mov bx,ax                              ;логич. номер файла в bx
           mov cx,1                               ;количество считываемых байт
           lea di,ds:mytext       
    r1: lea dx,ds:text[si]                            ;арес размещения байт
           
;считывание из файла
        mov ah,3Fh                             ;функция чтения
           int 21h      
       c2: cmp ax,0                               ;проверка на конец файла
           je finish1                             ; если конец, то переход на закрытие файла   
           cmp byte ptr ds:text[si],0Ah           ;текущий символ равен 0a?
       je short d1                           ;если нет, то читаем дальше
           inc si
       inc byte ptr ds:str1
        mov cx,1
           jmp short r1
 
      d1: cmp ds:str1,4
       jne short q1
       mov bp,0
      
       c1: mov cl,ds:text[si+bp-4]
       mov ds:[di],cl
       inc di
       inc bp
       cmp bp,5
       jne short c1
       q1: inc si
       mov ds:str1,0
       mov cx,1
           jmp short r1
       mov cx,1
           jmp short r1
      
           
    finish1:mov ah,3Eh
            int 21h
;создание нового файла
           lea dx,pathname
       mov handle,ax                              ;логич. номер файла в bx
       mov cx,0   
       mov ah,3Ch
       int 21h
       jc  error
       
;открываем файл
                             
           lea dx,pathname
       mov al,1
       mov ah,3Dh
       int 21h
;записываем в файл
       mov ah,40h
       lea dx, mytext
       mov cx,30
       int 21h
       mov ah,3Eh
            int 21h
 
       mov ah,9
       lea dx,ds:mytext
       int 21h
       jmp short n5
    error: mov ah,9
           lea dx,kom3
           int 21h
           jmp short n5
       n5:    mov ah,4ch
              int 21h
           mov ah,4ch
      int 21h
 cseg ends
 end s5

но сегодня преподаватель сказала,что нельзя выделять память для массива именно под мой файл
а нужно,запоминать по 1 байту на одно и то же место,и соответственно при конце строки проверить счетчик,равен ли он 5,если да,то вернуть каретку в файле назад и записать уже из этого файла строку из трех символов в другую область памяти,а из нее в новый файл и так в цикле делать до конца основного файла,но у меня не получается так сделать=(

Добавлено через 10 минут
ФедосеевПавел, вот я пытаюсь записывать побайтно и если строка из трех символов перемещаю каретку на 5 назад и пишу эту строку в другой массив,но у меня что-то здесь не так,не могу понять что,не могли бы вы подсказать?

Assembler
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
.386 
dseg segment use16 
text db 1 dup (?),'$' ; массив для записи символов из файла в память 
mytext db 3 dup (?),0Dh,0Ah,'$' ; массив для записи строк из трех символов 
kom2 db 0Dh,0Ah,'$' 
prigl db 0Dh,0Ah,'Pokskazhite dorohy k failu:',0Dh,0Ah,'$' 
vv1 db 50,51 dup (?);Для пути к файлу 
str1 dw ? ;счет символов 
kom3 db 0Dh,0Ah,'*******Oshibka otkritiya*****','$' 
 
 
pathname db 'c:\read2.asm',0 ; путь к файлу 
handle dw ? ;для лог номера 
str2 db ? 
 
 
dseg ends 
cseg segment use16 
assume cs:cseg, ds:dseg 
s5: 
;открытие файла 
mov dx,dseg 
mov ds,dx 
mov ah,9 
lea dx,prigl ;приглошение на ввод пути к файлу 
int 21h 
mov ah,0Ah 
lea dx,vv1; ввод пути файла 
int 21h 
mov ah,9 
lea dx,kom2 
int 21h 
movzx bp, byte ptr ds:vv1+1 
lea si,vv1 
mov byte ptr ds:[si+2+bp],0 
mov al,2 
mov ah,3Dh 
lea dx,ds:vv1+2 
lea di,ds:mytext 
int 21h 
jc error ; ошибка создания файла (CF=1) 
mov bx,ax ;логич. номер файла в bx 
r1: mov cx,1 ;количество считываемых байт 
lea dx,ds:text ;арес размещения байт 
;считывание из файла 
mov ah,3Fh ;функция чтения 
int 21h 
cmp ax,0 
je n5 
cmp byte ptr ds:text,0Ah 
je short d1 
inc byte ptr ds:str1 
jmp short r1 
 
d1:cmp ds:str1,4 
jne short q1 
mov cx,0ffffh 
mov dx,-5 
mov ah,42h 
int 21h 
 
dd1:lea dx,ds:mytext[si] 
mov ah,3Fh 
int 21h 
cmp si,5 
je short q2 
mov si,0 
jmp short r1 
 
q1:mov ds:str1,0 
jmp short r1 
q2:add si,1 
jmp short dd1 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
error: mov ah,9 
lea dx,kom3 
int 21h 
jmp short n5 
 
 
n5: mov ah,4ch 
int 21h 
 
 
 
 
 
mov ah,4ch 
int 21h 
cseg ends 
end s5

ФедосеевПавел · 05.06.2017, 21:51

Ох и затейник, ваш преподаватель!

Добавлено через 1 минуту
Т.к. Вы что-то делаете самостоятельно - поковыряю Ваш код. Но только изменю его форматированием.

Добавлено через 1 час 5 минут
Что-то с логикой программы.
Ведь алгоритм простой.

Code
1
2
3
4
5
6
7
8
9
10
11
12
1. Считываем имя файла-источника.
2. Открывает для чтения файл-источник.
3. Открываем для записи файл-результата.
3.9. Длина очередной строки равна 0.
4. Цикл, пока нет конца файла-источника
4.1. Считываем 1 байт
4.2. Увеличиваем длину строки на 1.
4.3. Если этот байт равен 0Ah, то перейти к п.6. иначе - к п.4.
4.4. Если длина строки равна 3+2, то скопировать строку
4.5. Перейти к п.3.9.
 
5. Закрытие файлов (ОБОИХ!!!). Выход из программы

Assembler
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
.386
stk     segment para    stack
        db      1024 dup(?)
stk     ends
 
dseg    segment use16
        FileSrc db      'Source.txt', 0
        FileDst db      'Destin.txt', 0
 
        SrcHndl dw      ?
        DstHndl dw      ?
 
        text    db      1 dup (?),'$' ; массив для записи символов из файла в память
        kom2    db      0Dh,0Ah,'$'
        kom3    db      0Dh,0Ah,'*******Oshibka otkritiya*****','$'
 
        StrLen  dw      ?
 
dseg ends
 
cseg    segment use16
        assume  cs:cseg, ds:dseg
start:
        mov dx,dseg
        mov ds,dx
 
        ;открытие файла источника
        mov ah,3Dh
        mov al,2        ;режим открытия: чтение и запись
        lea dx,FileSrc
        int 21h
        jnc SrcOpenOk
        jmp error ; ошибка создания файла (CF=1)
SrcOpenOk:
        mov SrcHndl,ax ;логич. номер файла
 
        ;открытие файла результата
        mov ah,3Ch
        mov cx,0
        lea dx,FileDst
        int 21h
        jnc DstOpenOk
        jmp error ; ошибка создания файла (CF=1)
DstOpenOk:
        mov DstHndl,ax ;логич. номер файла в bx
 
NewString:
        mov StrLen, word ptr 0
 
ReadByte:
        ;считывание из файла
        mov ah,3Fh ;функция чтения
        mov cx,1 ;количество считываемых байт
        lea dx,ds:text ;адрес размещения байт
        mov bx, SrcHndl
        int 21h
        cmp ax,0
        je SrcEOF
        ;увеличиваем на 1 длину строки
        inc word ptr ds:StrLen
        ;проверяем считанный символ на признак конца строки
        cmp byte ptr ds:text,0Ah
        je short TestString
        jmp short ReadByte
 
TestString:
        cmp ds:StrLen,5
        jne short NewString
        ;переместить указатель на 5 позиций назад
        mov ah,42h
        mov cx,0ffffh
        mov dx,-5
        mov bx,SrcHndl
        int 21h
 
        mov cx,5
CopyString:
        push cx
        ;считываем байт
        mov ah,3Fh
        mov cx,1
        mov bx,SrcHndl
        lea dx,ds:text
        int 21h
        ;записываем байт
        mov ah,40h
        mov bx,DstHndl
        lea dx,ds:text
        mov cx,1
        int 21h
        pop cx
        loop CopyString
 
        jmp NewString
 
error:
        mov ah,9
        lea dx,kom3
        int 21h
        jmp short @exit
 
 
SrcEOF:
        ;закрытие файла
        mov ah,3Eh
        mov bx,SrcHndl
        int 21h
        ;закрытие файла
        mov ah,3Eh
        mov bx,DstHndl
        int 21h
 
@exit:
        mov ah,4ch
        int 21h
cseg    ends
end     start

Добавлено через 36 секунд
Я на период отладки убрал ввод имени файла.

Новые блоги и статьи Все статьи Все блоги /
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .

ФедосеевПавел Модератор 8665 / 4502 / 1670 Регистрация: 01.02.2015 Сообщений: 13,931 Записей в блоге: 13
	04.06.2017, 23:23
	adam1105, вы сможете разобраться с чтением из файла при помощи промежуточной абстракции - ведь к ней вы потихоньку и подходите? Чтение из файла, перевод строки в число Там идея в следующем. Открывается текстовый файл и из него прослойка считывает несколько килобайт в буфер (можно сократить размер буфера до 10 байт). Программа запрашивает через процедуру чтение одного байта, и если буфер ещё полон - чтение из буфера, если буфер опустошён - заполнение буфера из файла и чтение из буфера. А уже потом анализ этих считанных байт на строки и прочее. Добавлено через 8 минут Или, если позволено условием задачи, можно принять, что буфер больше размера файла. Тогда считать в буфер и обработать текст в буфере. 0