Помогите пожалуйста ?

Информатика | 10 - 11 классы

Помогите пожалуйста !

Срочно 44 Балла ПАСКАЛЬ АБС.

NET .

Тема : Сложные типы данных.

Записи : Организовать файл, содержащий информацию о книгах.

Сведения о каждой из книг - это фамилия автора, название книги, количество страниц и год издания.

Найти название книг данного автора, изданных не позднее определённого года.

Фамилия автора и год вводятся с клавиатуры.

Ответить на вопрос
Ответы (1)
Алёшка777 25 янв. 2020 г., 00:21:48

1. Программа для создания файла / / PascalABC.

NET 3.

1, сборка 1239 от 08.

05. 2016

type tBook = record author : string[30] ; naim : string[50] ; pages : integer ; godizd : integer end ;

begin var f : file of tBook ; Rewrite(f, 'books.

Dat') ; Writeln('Ввод данных по книгам') ; var s1, s2 : string ; var i1, i2 : integer ; var book : tBook ; repeat s1 : = ReadlnString('Автор или * для окончания ввода : ') ; if s1< ; > ; ' * ' then begin s2 : = ReadlnString('Название книги : ') ; i1 : = ReadlnInteger('Количество страниц : ') ; i2 : = ReadlnInteger('Год издания : ') ; (book.

Author, book.

Naim, book.

Pages, book.

Godizd) : = (s1, s2, i1, i2) ; Write(f, book) end until s1 = ' * ' ; Writeln(' * * * Ввод завершен * * * ') ; f.

Close

end.

Тестовое решение

Ввод данных по книгам

Автор или * для окончания ввода : Жюль Верн

Название книги : 80 тысяч километров под водой

Количество страниц : 573

Год издания : 1951

Автор или * для окончания ввода : Сергей Лукьяненко

Название книги : Дозор

Количество страниц : 934

Год издания : 2004

Автор или * для окончания ввода : Жюль Верн

Название книги : Властелин мира

Количество страниц : 104

Год издания : 2011

Автор или * для окончания ввода : * * * * Ввод завершен * * *

2.

Программа для выборки / / PascalABC.

NET 3.

1, сборка 1239 от 08.

05. 2016

type tBook = record author : string[30] ; naim : string[50] ; pages : integer ; godizd : integer end ;

begin var f : file of tBook ; Reset(f, 'books.

Dat') ; var s : = ReadlnString('Автор книги : ') ; var y : = Readinteger('Год издания, не ранее : ') ; var k : = 0 ; var book : tBook ; while not f.

Eof do begin Read(f, book) ; if (book.

Author = s) and (book.

Godizd> ; = y) then begin Writeln(book) ; Inc(k) end ; end ; if k = 0 then Writeln('Таких книг не найдено') ; f.

Close

end.

Тестовое решение

Автор книги : Жюль Верн

Год издания, не ранее : 2005

(Жюль Верн, Властелин мира, 104, 2011).

Ilada22nosova1 28 июн. 2020 г., 18:13:44 | 5 - 9 классы

Запишите команды для выполнения следующих действий с БД «Домашняя библиотека» ;а) сортировки в порядке возрастания годов издания книги ;б) сортировки по двум ключам : АВТОР и ГОД, исключая книги Беляе?

Запишите команды для выполнения следующих действий с БД «Домашняя библиотека» ;

а) сортировки в порядке возрастания годов издания книги ;

б) сортировки по двум ключам : АВТОР и ГОД, исключая книги Беляева А.

Р. ;

в) удаления из БД «Домашняя библиотека» всех записей о книгах, стоящих на пятой полке и изданных до 1990 года.

Safie 11 мар. 2020 г., 13:01:33 | 5 - 9 классы

Книга в которой150 страниц по 240 символов на каждой странице опредилить количество информации книги?

Книга в которой150 страниц по 240 символов на каждой странице опредилить количество информации книги.

Ambardzumyana 10 янв. 2020 г., 22:09:42 | 1 - 4 классы

Помогите Кто и когда изобрёл радио указав название автора и год издания книги?

Помогите Кто и когда изобрёл радио указав название автора и год издания книги.

Aleksandra223 12 янв. 2020 г., 07:29:13 | 5 - 9 классы

Надо заполнить в таблицу книги не менее 6 книг?

Надо заполнить в таблицу книги не менее 6 книг.

Сначало надо написать книгу, потом автора, издательство, год издания и количество страниц!

Плизз!

Spirit1996 29 мар. 2020 г., 04:56:44 | 10 - 11 классы

Книга 160 страниц на каждой странице 40 строк по 60 символов определить количество информации содержащейся в книге?

Книга 160 страниц на каждой странице 40 строк по 60 символов определить количество информации содержащейся в книге.

Nuretdinova 26 июл. 2020 г., 17:23:48 | 5 - 9 классы

Люююди помогите пожалуйста?

Люююди помогите пожалуйста!

Очень надо)Баллами не обижу) Напишите команды выборки с использованием сложных логических выражений : • определить все даты до 17 марта, когда температура была выше нуля градусов ; • определить фамилии всех учеников, которые посещают танцы, но не посещают факультатив по геологии ; • получить список всех отличников по гуманитарным дисциплинам ; • определить полку, на которой стоит книга Толстого Л.

Н. «Повести и рассказы» ; • определить фамилии авторов книг с названием «Повести и рассказы», выпущенных до 1985 года ; • получить инвентарные номера всех книг, стоящих на пятой и седьмой полках ; • получить фамилии авторов и названия книг, выпущенных в период с 1985 по 1990 год ; • получить инвентарные номера всех книг, стоящих ниже пятой полки и изданных после 1990 года.

Bartyshvika 15 июн. 2020 г., 21:37:18 | 10 - 11 классы

Дан файл, содержащий различные даты?

Дан файл, содержащий различные даты.

Каждая дата — это число, месяц и год.

Найти год с наименьшим номером.

Паскаль.

ValeriaCat1 2 сент. 2020 г., 20:08:47 | 1 - 4 классы

Какие основные характеристики книги надо знать чтобы найти нужную тебе книгу количество страниц название книги автор год издания размеры книги количество иллюстраций?

Какие основные характеристики книги надо знать чтобы найти нужную тебе книгу количество страниц название книги автор год издания размеры книги количество иллюстраций.

Помогите.

Leru13 22 дек. 2020 г., 21:53:02 | 10 - 11 классы

Помогите сделать лабораторнуюзадача с использованием записейВ книжном магазине продаются учебники для школьников?

Помогите сделать лабораторную

задача с использованием записей

В книжном магазине продаются учебники для школьников.

Создать таблицу, содержащую сведения об учебниках : предмет, класс, издательство, год издания, автор, цена.

Используя эти данные вывести на экран список учебников, изданных в 2002 году, а также посчитать суммарную стоимость учебников для 1 - го класса, имеющихся в магазине.

Pascal.

Аня1123 18 июл. 2020 г., 14:28:30 | 5 - 9 классы

Помогите пожалуй в книге 176 страниц на каждой странице 40 строк по 60 символов определить количество информации содержащейся в книге?

Помогите пожалуй в книге 176 страниц на каждой странице 40 строк по 60 символов определить количество информации содержащейся в книге.

На этой странице вы найдете ответ на вопрос Помогите пожалуйста ?. Вопрос соответствует категории Информатика и уровню подготовки учащихся 10 - 11 классов классов. Если ответ полностью не удовлетворяет критериям поиска, ниже можно ознакомиться с вариантами ответов других посетителей страницы или обсудить с ними интересующую тему. Здесь также можно воспользоваться «умным поиском», который покажет аналогичные вопросы в этой категории. Если ни один из предложенных ответов не подходит, попробуйте самостоятельно сформулировать вопрос иначе, нажав кнопку вверху страницы.