26 / 18 / 8
Регистрация: 18.05.2016
Сообщений: 72
1

Задача на тему Файлы

17.10.2016, 18:24. Показов 609. Ответов 6

Использованный в лабораторной работе № 17 (Использование записей) массив записей должен сохраняться и обрабатываться в виде файла. При этом необходимо по указанию преподавателя реализовать следующие возможные способы создания этого файла:
- как типизированного файла из записей;
- как типизированного файла из символов;
- как типизированного файла из строк;
- как текстового файла.
При этом необходимо для каждого варианта создания файла, отличного от типизированного файла из записей, придумать способ сборки (в оперативной памяти) записи (в том смысле, как это было в массиве записей) с информацией, используя для сборки тот материал, что хранится в файле.
Вот Лаба из задания номер 17.
Задача на тему Файлы


Помогите пожалуйста очень нужно.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.10.2016, 18:24
Ответы с готовыми решениями:

Задача на тему: "Файлы, массивы"
Ввести с клавиатуры целое число. Если остаток от деления этого числа на 5 равен 1, то...

Задача на тему: множества
Задан текст из маленьких латинских букв в конце стоит точка. Напечатать в алфавитном порядке все...

Задача на тему функции
Условие: http://img140.imageshack.us/img140/6048/lab7zad3hm0.jpg Мой вариант решения: program...

Сложная Переделка на тему "Файлы. Начало есть.
Доброго вам время суток! В условиях задачи 18 выяснить, имеется ли пассажир, багаж которого...

6
Эксперт Pascal/Delphi
6803 / 4562 / 4817
Регистрация: 05.06.2014
Сообщений: 22,438
17.10.2016, 18:40 2
LOGINMAIL, текст программы наберите вручную.
0
26 / 18 / 8
Регистрация: 18.05.2016
Сообщений: 72
17.10.2016, 19:04  [ТС] 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
type fio = record
name,otch,surname:string
end;
 abonent = record
n0: integer; //номер абонента
f:fio; //Фио
dar_r:string[8]; //Дата рождения
workplace:string; //место работы(учебы)
date:string[8];
books:byte; //количество выданных книг
point:boolean; //отметка о перегистрации
end;
 var base:array[1...100] of abonent;
j,i:integer;
begin
 for i:=1 to 99 do //нахождение однофамильцев
for j:=i+1 to 100 do
 if base[i].fio.surname = base[j].fio.surname then
writeln (base[i].n0,' ',base[j].n0)
 
for i:=1 to 100 do //нахождение людей без отметки перерегистрации
if base[i].point = false then
writeln (base)
0
26 / 18 / 8
Регистрация: 18.05.2016
Сообщений: 72
25.10.2016, 10:33  [ТС] 4
Помогите пожалуйста
0
Почетный модератор
64270 / 47569 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
25.10.2016, 11:19 5
Цитата Сообщение от LOGINMAIL Посмотреть сообщение
необходимо по указанию преподавателя реализовать следующие возможные способы создания этого файла:
И какое же было указание преподавателя?
0
26 / 18 / 8
Регистрация: 18.05.2016
Сообщений: 72
25.10.2016, 11:23  [ТС] 6
- как типизированного файла из записей;
- как типизированного файла из символов;
- как типизированного файла из строк;
- как текстового файла.
0
Почетный модератор
64270 / 47569 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
25.10.2016, 11:26 7
Это Вам как истинному халявщику аж 4 программы писать?
Хоть условие задачи напишите, вдруг желающий найдется горбатиться за так.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.10.2016, 11:26
Помогаю со студенческими работами здесь

Задача не сложная на тему строки.
Создайте программу, которая запрашивает тестовую строку и заменяет все слоги "ра" на "пар"....

Задача на тему работа со строками
Если в строке цифр больше, чем латинских букв, заменить все цифры знаком '+'. В противном случае...

Задача на тему PascalABC (Циклы)
Задача 1. Найти сколько слагаемых необходимо, чтобы сумма 2+4+6+... оказалась больше 100. ...

Нужна любая задача на тему: Применение модуля CRT
Нужна срочно любая задача на тему: Применение модуля CRT.


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru