Исполнитель Чертёжник действует на координатной плоскости. У него есть перо, которое может быть поднято или опущено. При поднятом пере Чертёжник просто перемещается по плоскости; при опущенном - - оставляет след в виде линии. Исполнитель может выполнять команды: 1) сместиться в точку (a, b), перемещающую Чертёжника из текущей точки с координатами (х, у) в точку с координатами (a, b);
2)
2) сместиться на вектор (a, b), перемещающую
Чертёжника из текущей точки с координатами (х, у) в точку с координатами (x + a, y + b).
a) Определите, что будет нарисовано после выполне-
ния Чертёжником следующей программы.
Поднять перо Сместиться в точку (1; 5) Опустить перо Сместиться на вектор (0; -4) Сместиться на вектор (4; 0) Сместиться на вектор (0; 4) Сместиться на вектор (-4; 0) Сместиться на вектор (2; 3) Сместиться на вектор (2; -3)
Если здесь вопрос понимать "Все записи в таблице реляционной БД имеют", то ответ, скорее всего,
d) Одинаковое количество полей
3) Укажите правильную последовательность действий при работе с базами данных (составить последовательность из букв):
c) Продумать структуру базы данных
d) Дать имя каждому полю в базе данных
a) Занести данные в таблицу
b) Осуществить сортировку записей в базе данных
4) Поиск информации– это:
a) выбор информации по определённым правилам
5) Примером базы данных может служить:
Скорее всего
b) Телефонный справочник,
хотя и
c) Энциклопедия тоже может быть
6) В каком из перечисленных типов полей, данные могут выглядеть таким образом:
Да или Нет ?
b) В логическом поле
7) В какой из перечисленных пар данные относятся к одному типу?
a) 12.04.98 и 01/02/99; - тип дата
b) ДА и TRUE (ИСТИНА); - логический тип
8) База Данных содержит информацию о каждой собаке из клуба собаководства: кличка, порода, дата рождения, пол, количестве медалей. Какого типа должны быть поля?
d) текстовое, текстовое, дата, текстовое, числовое;
Возможно, такие ответы. Хотя многие вопросы некорректны.
begin
var a,b,c:integer;
Write('Введите три натуральных числа: '); Read(a,b,c);
var s:=a+b+c;
var k:=Trunc(sqrt(s));
if k*k=s then Writeln('Сумма чисел - квадрат ',k)
else Writeln('Сумма чисел не является квадратом целого')
end.
Тестовое решение
Введите три натуральных числа: 13 4 8
Сумма чисел - квадрат 5
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 - №2
begin
var a,b,c:integer;
Write('Введите три натуральных числа: '); Read(a,b,c);
var s:=power(a*b*c,1/3);
if s=int(s) then Writeln('Среднее геометрическое - целое число')
else Writeln('Среднее геометрическое - нецелое число')
end.
Тестовое решение
Введите три натуральных числа: 16 8 15
Среднее геометрическое - нецелое число