Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Mazilo
36 / 36 / 72
Регистрация: 31.10.2014
Сообщений: 206
1

Работа с типизироваными файлами

02.01.2015, 15:52. Просмотров 283. Ответов 3
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
var f : file of integer;
     k,i,s : integer;
begin
assign(f,'1.txt'); rewrite(f);
s:=-1; k:=-2; i:=-3; write(f,s,k, i);
close(f);
end.
Простенькая программа, которая должна записать -1, -2 и -3 в файл. Вот только записывает мне в файл, какие-то 6 символов, и аж ни как не -1, -2, -3. В чем проблема?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.01.2015, 15:52
Ответы с готовыми решениями:

Работа с файлами
даны символьные файлы f1 f2. переписать в файл f посимвольно из файлов f1 и f2....

Работа с файлами
Задание-найти в массиве минимальный элемент и записать его в первую строку...

работа с файлами
здравствуйте.я вас очень прошу помогите решить задачу.чтоб просто было решено...

Работа с типизированными файлами
Задан файл в котором может находится неограниченное ко-во чисел диапазона...

Работа с типизированными файлами
В корневом каталоге диска С: сформировать файл z1.xxx, который будет содержать...

3
Puporev
Модератор
54678 / 42099 / 29068
Регистрация: 18.05.2008
Сообщений: 99,341
02.01.2015, 17:45 2
Потому что файл типизированный и в нем содержатся не вводимые символы, а информация про них. И читать такой файл можно только программой.
Если хотите читать в файле, используйте текстовый файл.
Pascal
1
var f : text;
и пишите запись так.
Pascal
1
write(f,' ',s,' ',k,' ', i);
0
Mazilo
36 / 36 / 72
Регистрация: 31.10.2014
Сообщений: 206
03.01.2015, 17:06  [ТС] 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
const n=4;
type fl=file of integer;
var f : fl;
     i,s,x : integer;
 
begin
assign(f,'1.txt'); rewrite(f);
 
s:=1;
for i:=1 to n do
 begin
 s:=s*2;
 write(f,s);
 end;
 
while not (eof(f)) do begin
read(f,x); write(x); end;
close(f);
end.
Ничего не вывод на экран, а если использую прямой доступ к какому-то компоненту файла, то выводит. Что ж такое?
0
Puporev
Модератор
54678 / 42099 / 29068
Регистрация: 18.05.2008
Сообщений: 99,341
03.01.2015, 17:10 4
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
assign(f,'1.txt');
rewrite(f);
s:=1;
for i:=1 to n do
 begin
  s:=s*2;
  write(f,s);
 end;
reset(f);//открой для чтения
while not (eof(f)) do
 begin
  read(f,x);
  write(x,' ');
 end;
close(f);
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.01.2015, 17:10

Помогите...работа с файлами
Дело такое: нужно создать модуль, который будет создавать файл путем...

Работа с типизированными файлами
Описать записи с именем ORDER, содержащую следующие поля: расчетный счет...

Работа с файлами 2й вариант.
народ помогите пожалуста выручите человека вот ее задание:


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

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

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