Есть книги и авторы, одну книгу могут писать несколько авторов и, конечно же, один автор может написать много книг (промежуточный вопрос по sql: как организовать такую связь? вы тут же отвечаете: ""это "многие ко многим", потому через 3 таблицы"").
И далее уже непосредственно задача: напишите запрос, который выведет названия книг написанных ровно двумя авторами.
Индекс помогает ускорить запросы на получение данных, но замедляет процесс добавления, изменения и удаления записей, а также занимает дополнительное пространство на диске. Индексы могут быть добавлены или удалены без влияния на сами данные.
Пусть есть процедура, которая умеет сдвигать массив влево на 1 элемент, начиная с указанного символа (устанавливая последний элемент равным нулю):
type newArr = array [1..5] of integer;
procedure shiftArr(var promArr: newArr; k:integer);
var j:integer;
begin
for j:=k to 4 do
promArr[j]:=promArr[j+1];
promArr[high(promArr)]:=0;
end;
Напишите функцию, которая определяет являются ли значения переданного массива целых чисел уникальными относительно друг друга.
Протестируйте работу функции на массиве из 7 случайных элементов из диапазона от 1 до 15-ти.