0 / 0 / 0
Регистрация: 03.03.2010
Сообщений: 21
1

Вывести все книги заданного автора

11.04.2011, 22:18. Показов 1377. Ответов 4
Метки нет (Все метки)

Дан файл, который содержит название авторов и книг. Вывести все книги заданного автора.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.04.2011, 22:18
Ответы с готовыми решениями:

Записи: найти и вывести на печать все книги заданного автора
Здравствуйте, может кто помочь? В библиотечном каталоге, который содержит фамилию автора, название...

Ввести массив записей, который содержит Автора и название книги. Вывести на экран те записи, которые имеют одного автора.
1. Процедуры и функции: Найти значение переменной А по формуле: где С и В -одномерные...

Вывести названия книг заданного автора, изданных с 1960 года
Дан файл содержащий сведения о книгах. Нужно вывести названия книг заданного автора, изданных с...

Вывести на экран список книз заданного автора количество страниц в которых более 300
нужно создать файл, который будет содержать: название книги фамилию автора год издания...

4
107 / 107 / 110
Регистрация: 28.02.2011
Сообщений: 978
11.04.2011, 22:55 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
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
program Project1;
 
uses
  crt;
Type
    Struct=record
     Avtor:string[25];
     Kniga:string[25];
     end;
var f:file of Struct;
buf:Struct;
cmd:string[25];
i,n:integer;
begin
ClrScr;
assign(f,'data');
reset(f);
readln(cmd);
while not eof(f) do
begin
read(f,buf);
for i:=1 to length(cmd) do cmd[i]:=Upcase(cmd[i]);
for i:=1 to length(buf.avtor) do buf.avtor[i]:=Upcase(buf.avtor[i]);
if cmd=buf.avtor then writeln(buf.kniga);
end;
close(f);
readln;
end.
заполнить данные думаю понятно как
1
0 / 0 / 0
Регистрация: 03.03.2010
Сообщений: 21
13.04.2011, 20:53  [ТС] 3
Как создать этот файл? Ломала голову целый день. Он должен быть в тхт? Покажите пожалуйста пример!
0
107 / 107 / 110
Регистрация: 28.02.2011
Сообщений: 978
13.04.2011, 23:07 4
Нет в файл пишеш структуру вместо reset rewrite, в вместо read wrete
0
0 / 0 / 0
Регистрация: 03.03.2010
Сообщений: 21
13.04.2011, 23:40  [ТС] 5
Какое разрешение ставить нужно? Я создала файл (текстовый), но он пустой. Если вести вручную данные, то как пометить: где автор, где книга, ведь должны быть какие то метки. Иначе как программа поймет к какому автору принадлежит данная книга? Или нужно вводить данные каким то определенным образом?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
13.04.2011, 23:40

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Книги. Распечатать те записи, которые имеют одного автора
Ввести массив записей, содержащий автора и название книги. Распечатать те записи, которые имеют...

Ввести массив записей который содержит автора и название книги
Три программы: 1. Ввести массив записей который содержит автора и название книги. Вывести на...

Найти названия книги данного автора, изданных с 1960го года
Сформировать файл bibl, содержащий сведения о книгах (автор, название книги, год издания). Найти...

Вывести все найденные книги по атрибуту Автор
Задача такая: Дан текстовый файл, в котором есть 30 наименований книг( с автором,годом издания)....


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

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

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