ответьте на вопросы 1)какое поле будет ключевым для таблицымагазин(типмагазина, адрес, численностьассортимента, режимработы, числоработников)? a) тип магазина b) число работников c) режим работы d) ни одно из них 2 какие таблицы базы данных имеют связь "один ко многим"? a) "школы", "директора" b) "студенты", "удостовличности" c) "страны", "флаги" d) "планеты", "спутники" 3). в какой строке следует указывать условия отбора в запросе? a) criteria b) show c) sort d) table 4) какому полю таблицы школа (номер школы, фотография, датасоздания, директор, tелефон, адрес, регион) можно задать тип attachment? a) дата создания b) директор c) фотография d) адрес 5) на основе чего может быть создана форма базы данных? a) таблицы, отчета b) таблицы c) таблицы, запроса d) запроса .отчета
Ответы
program massiv4;
uses crt;
var a, b, c:integer;
begin
clrscr;
randomize;
a:=random(3)+2;
b:=random(35)+10;
c:=a*b*100;
writeln(c);
readln;
end.
вариант 2: показывает более плавную кривую распределения символов A по странице, поскольку генерирует случайное значение встречаемости символа в каждой новой строке:
program massiv4;
uses crt;
var i, a, b, c:integer;
begin
for i := 0 to 99 do
begin
randomize;
b:=random(35)+10;
for i := 1 to b do
begin
randomize;
a:=random(3)+2;
for i := 1 to a do
begin
c:=c+a*b;
end;
end;
end;
writeln(c);
readln;
end.
uses crt;
var a, b, c:integer;
begin
clrscr;
randomize;
a:=random(3)+2;
b:=random(35)+10;
c:=a*b*100;
writeln(c);
readln;
end.
вариант 2: показывает более плавную кривую распределения символов A по странице, поскольку генерирует случайное значение встречаемости символа в каждой новой строке:
program massiv4;
uses crt;
var i, a, b, c:integer;
begin
for i := 0 to 99 do
begin
randomize;
b:=random(35)+10;
for i := 1 to b do
begin
randomize;
a:=random(3)+2;
for i := 1 to a do
begin
c:=c+a*b;
end;
end;
end;
writeln(c);
readln;
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Расставь команды на схеме алгоритма "сходи в кино" вместо знаков ? впиши слова ДА и НЕТ
Автор: bristolhouse20151001
Чему равна разность чисел 503 и 357 в восьмеричной системе счисления? (ответ в 8СС)
Автор: rukodelnizza1
За яким алгоритмом у середовищі Скретч створюють складні проекти
Автор: Olga Arutyunyan
Label1.BackColor=QBColor(3) - свойству Backcolor (цвет фона надписи) объекта Label1 присваивается значение, полученное из набора QBColor под индексом 3
Form1.Caption="Пока!" - Название формы Form1 присваивается надпись в шапке "Пока!"
Form1.Left=10000 - форме Form1 присваивается положение, отчитываемое слева в пикселях, относительно экрана, оно равно 1000
End Sub.- конец обработчика-функции