Даны таблицы

CREATE TABLE Автор (Код_Автора INT , Фамилия VARCHAR(50) NULL, Имя VARCHAR(50) NULL, Отчество VARCHAR(50) NULL, Пол VARCHAR(50) NOT NULL , Дата_рождения DATETIME , Телефон CHAR(9))

CREATE TABLE Книга (Код_Книги INT, Название VARCHAR(50) NOT NULL, Цена MONEY, Тематика VARCHAR(50) NOT NULL, Издательство VARCHAR(50) NOT NULL, Код_Автора INT NOT NULL)

Вывести список авторов, которые пишут романы, но не работают в жанре фантастики.

Правильный ответ:

• # Определите типы команд языка SQL.
• # Разработана процедура, возвращающая список телефонных тарифов городов Поволжья. CREATE PROC my_proc @cur CURSOR VARYING OUTPUT AS SET @cur=CURSOR FORWARD_ONLY STATIC FOR SELECT Название, Тариф, Регион FROM Город WHERE Регион="Поволжье" OPEN @cur Вызов процедуры и вывод на печать названий городов из выходного курсора осуществляется следующим образом: DECLARE @my_cur CURSOR DECLARE @n VARCHAR(20) EXEC my_proc @cur=@my_cur OUTPUT FETCH NEXT FROM @my_cur INTO @n SELECT @n WHILE (@@FETCH_STATUS=0) BEGIN FETCH NEXT FROM @my_cur INTO @n SELECT @n END CLOSE @my_cur DEALLOCATE @my_cur Укажите правильные ответы.
• # Пусть в таблице Книга представлены записи, где значения поля Код_Книги равны 1, 2 ,3 ,4 ,5 ,6 ,7 ,8 ,9 и 10. Создан курсор для вывода списка книг издательства "Мир". DECLARE @n VARCHAR(50), @iz VARCHAR(50), @p MONEY, @message VARCHAR(80) DECLARE @cur1 CURSOR PRINT ' Список книг' DECLARE cursor1 CURSOR GLOBAL SCROLL KEYSET FOR SELECT Название, Издательство, Цена FROM Книга WHERE Издательство="Мир" OPEN cursor1 SET @cur1=cursor1 FETCH ABSOLUTE 9 FROM cursor1 INTO @n, @iz, @p DELETE Книга WHERE CURRENT OF @cur1 FETCH RELATIVE -2 FROM cursor1 INTO @n, @iz, @p UPDATE Книга SET Цена=Цена*1.5 WHERE CURRENT OF cursor1 SELECT @message='Книга '+@n+' Цена '+ CAST(@p AS VARCHAR(4)) PRINT @message CLOSE cursor1 DEALLOCATE cursor1 Какие действия выполнит система?
• # Дан фрагмент сценария VBScript для изменения и выборки данных из таблицы Автор, расположенной в базе данных basa_user1 на SQL Server с именем its. Set cn=Server.CreateObject("ADODB.Connection") Set rst=Server.CreateObject("ADODB.Recordset") cn.open "pwd=user1;driver={SQL Server}; server=its; database = basa_user1" cn.execute "UPDATE Автор SET Телефон='23-45-67' WHERE Фамилия='Иванов'" rst.open "SELECT Фамилия, Телефон FROM Автор", cn do until rst.eof response.write rst.fields(0) response.write rst.fields(1) response.write rst.fields(2)&"<br>" rst.movenext loop Указать правильные ответы.
• # Пусть дана таблица Рейс. Номер_рейсаINTКонечный_пунктCHAR(10)Дата_вылетаDATETIMEПродолжительность_маршрутаINTЧисло_билетовINTСтоимостьMONEY Вывести номера рейсов с датой отправления в города, в названии которых встречаются буквы "ц" или "х".