nurmakhanovna02
09.05.2022 13:11

Создайте базу данных, позволяющую автоматизировать работу школьной библиотеки. В базе необходимо хранить
информацию о читателях библиотеки, датах выдачи и возврате читателями
книг, список книг в фондах библиотеки, количество экземпляров каждой
книги .
Запустите исполнимый файл программы Microsoft Access 2007 В группе
«Новая пустая база данных» щелкните ЛКМ на значке «Новая база данных».
В поле «Имя файла» введите название базы данных – «Библиотека».
Нажмите кнопку «Создать».
С конструктора создайте следующие таблицы:
Книги – эта таблица будет содержать следующие поля:
Инвентарный номер, Название книги, Автор, Количество страниц, Жанр,
Дата поступления, Стоимость и место хранения.
Должности – эта таблица будет состоять из следующих полей: Код
должности и Должность.
Клиенты – в этой таблице будут следующие поля: Код клиента,
Фамилия, Имя, Отчество, Должность, Город, Адрес и Мобильный телефон.
Оборот книг – эта таблица будет содержать такие поля:
Инвентарный номер книги, Дата выдачи, Дата возврата и Клиент.
Заполните таблицы данными, чтобы в каждой таблице было не менее 5
записей.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
KatyaDihtiar3112
19.07.2020 07:33
Var  
i, j, k : integer; 
 a : array [0..9,0..9] of char; 
procedure U(i,j:integer);  
var c : char; 
begin 
 c:=a[i,j]; a[i,j]:=' ';  
if (c='W')and(a[i+1,j]='B') then U(i+1,j);
  if (c='B')and(a[i+1,j]='W') then U(i+1,j); 
 if (c='W')and(a[i-1,j]='B') then U(i-1,j); 
 if (c='B')and(a[i-1,j]='W') then U(i-1,j); 
 if (c='W')and(a[i,j+1]='B') then U(i,j+1);  
if (c='B')and(a[i,j+1]='W') then U(i,j+1); 
 if (c='W')and(a[i,j-1]='B') then U(i,j-1); 
 if (c='B')and(a[i,j-1]='W') then U(i,j-1); 
end; 
begin  
assign(input,'input.txt');
reset(input); 
 assign(output,'output.txt');
 rewrite(output);  
for i:=1 to 8 do begin  for j:=1 to 8 do
 read(a[i,j]); 
 readln  
end;  
for i:=1 to 8 do
 begin 
 a[0,i]:=' '; a[9,i]:=' ';  a[i,0]:=' '; a[i,9]:=' '  
end; 
 k:=0; 
 for i:=1 to 8 do 
 for j:=1 to 8 do 
 if a[i,j]<>' ' then
begin 
 k:=k+1; U(i,j)  
end;  
write(k); 
 close(output) 
end. 
0,0(0 оценок)
Ответ:
AlexSubbotin11
20.08.2021 20:01

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

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота