Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.70/20: Рейтинг темы: голосов - 20, средняя оценка - 4.70
oinari
5 / 4 / 0
Регистрация: 18.10.2009
Сообщений: 69
1

Файлы (файл не открыт для ввода)

14.11.2009, 21:41. Просмотров 3619. Ответов 5
Метки нет (Все метки)

Почему выдаёт такую ошибку: ошибка ввода/вывода 104
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses
 crt;
var
 f:text;
 b:string;
begin
assign(f,'vedomost.txt');
rewrite(f);
writeln(f,b);
readln(f,b);
readln;
close(f) 
end.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.11.2009, 21:41
Ответы с готовыми решениями:

Ошибка, файл не открыт для ввода
Procedure InpData(Var Group:Groups; Var N:TGroup); Var I:Integer; FF,GG,PP,NN,RR:Text;...

Ошибка 104 (файл не открыт для ввода)
что делать с этой ошибкой? вот сама прога: var s:string; a,b,c,d:char; f1,f2:text; i:integer;...

Файл не открыт для записи
Шото я не доганяю....Пишет что файл не открыт для записи...:O_O: Program Naselenie; uses crt;...

Файл не открыт для ввода - почему?
Procedure write_numbers; var f :text; i,j :integer; begin assign(f,'num.txt'); ...

Ошибка ввода/вывода 104 - файл не открыт для ввода
var a:array of integer; n,j,i,k: integer; f:text; begin ...

5
victor_g
60 / 60 / 9
Регистрация: 09.11.2009
Сообщений: 198
14.11.2009, 21:45 2
Вы не можете одновременно писать
Цитата Сообщение от oinari Посмотреть сообщение
Pascal
1
writeln(f,b);
и читать
Цитата Сообщение от oinari Посмотреть сообщение
Pascal
1
readln(f,b);
текстовый файл
0
Puporev
Модератор
56563 / 43266 / 29911
Регистрация: 18.05.2008
Сообщений: 102,912
14.11.2009, 21:46 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
begin
assign(f,'vedomost.txt');
rewrite(f);
b:='11111111111';
writeln(f,b);
reset(f);
readln(f,b);
writeln(b);
readln;
close(f) 
end.
0
victor_g
60 / 60 / 9
Регистрация: 09.11.2009
Сообщений: 198
14.11.2009, 21:54 4
Puporev, а разве не надо сначала закрыть файл
Pascal
1
Close(f);
, а потом уже его открывать для чтения?
0
oinari
5 / 4 / 0
Регистрация: 18.10.2009
Сообщений: 69
14.11.2009, 21:56  [ТС] 5
Цитата Сообщение от victor_g Посмотреть сообщение
Вы не можете одновременно писать
а как мне записать в файл информацию и вывести её?
0
Puporev
Модератор
56563 / 43266 / 29911
Регистрация: 18.05.2008
Сообщений: 102,912
14.11.2009, 22:01 6
Лучший ответ Сообщение было отмечено как решение

Решение

victor_g,Если файл открыт для записи и записан, то перед чтением его можно не закрывать., Проверьте на этом коде. После чтения обязательно закрыть.

Добавлено через 45 секунд
oinari,
Ну я же тебе написал
Pascal
1
2
b:='11111111111';
writeln(f,b);
3
14.11.2009, 22:01
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.11.2009, 22:01

Ошибка ввода\вывода 104, файле не открыт для ввода (строка 0)
Всё работает, но пишет: "ошибка ввода\вывода 104, файле не открыт для ввода (строка 0). ...

Ошибка ввода вывода 103: файл не открыт
Люди добрые выручите,завтра сдавать работу а я обнаружил ошибку при работе одной из процедур.Ошибка...

Ошибка Файл не может быть открыт ядром базы данных microsoft jet. Файл уже открыт другим пользователем для монопольного доступа или
После написания программы, записал исходник на диск. При запуске экзешника с диска появляется такая...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru