Базы данных: определение, классификация 1. Базы данных – это: 1) набор сведений, организованный по определенным правилам и представленный в виде, пригодном для обработки автоматическими средствами 2) программные средства, позволяющие организовывать информацию в виде таблиц 3) программные средства, осуществляющие поиск информации 4) программно-аппаратный комплекс, предназначенный для сбора, хранения, обработки и передачи информации 2. Информационная система – это: 1) набор сведений, организованный по определенным правилам и представленный в виде, пригодном для обработки автоматическими средствами 2) программные средства, позволяющие организовывать информацию в виде таблиц 3) программные средства, осуществляющие поиск информации 4) программно-аппаратный комплекс, предназначенный для сбора, хранения, обработки и передачи информации 3. В реляционной БД информация организована в виде: 1) сети 2) дерева 3) прямоугольной таблицы 4. В иерархической БД информация организована в виде: 1) сети 2) дерева 3) прямоугольной таблицы 5. Краткие сведения об описываемых объектах – это: 1) фактографическая БД 2) документальная БД 3) централизованная БД 4) распределенная БД 6. Обширная информация самого разного типа – это: 1) фактографическая БД 2) документальная БД 3) централизованная БД 4) распределенная БД 7. Вся информация хранится на одном компьютере – это: 1) фактографическая БД 2) документальная БД 3) централизованная БД 4) распределенная БД 8. Разные части БД хранятся на разных компьютерах – это: 1) фактографическая БД 2) документальная БД 3) централизованная БД 4) распределенная БД 9. Строка таблицы, содержащая информацию об одном объекте – это: 1) запись БД 2) поле БД 10. Столбец таблицы, содержащий значения определенного свойства – это: 1) запись БД 2) поле БД 11. БД содержит информацию об учениках школы: фамилия, класс, за тест, за практическое задание, общее количество . Какого типа должно быть поле общее количество ? 1) символьное 2) логическое 3) числовое 4) любого типа 5) дата
Ответы
1)
var massive :
array [1..100] of integer;
i : integer;
begin
// рандомизируем сид
randomize();
for i := 1 to 100 do begin
// заполняем массив случайными числами от -100 до 100
massive[i] := random(201)-100 ;
// выводим число, если оно больше нуля и кратно двум.
if ((massive[i] > 0) and (massive[i] mod 2 = 0))
then write(massive[i]+' ');
end;
end.
2)
var a :
array [1..50] of integer;
i ,summ: integer;
begin
// рандомизируем сид
randomize();
// инициализируем переменную суммы
summ := 0;
for i := 1 to 50 do begin
// заполняем массив случайными числами от -100 до 100
a[i] := random(201)-100 ;
// суммируем если кратно трем
if a[i] mod 3 = 0 then begin summ := summ + 1; write(a[i] + ' '); end;
end;
// выводим результат
writeln();
writeln('Сумма чисел кратных трем = ' + summ);
end.
var massive :
array [1..100] of integer;
i : integer;
begin
// рандомизируем сид
randomize();
for i := 1 to 100 do begin
// заполняем массив случайными числами от -100 до 100
massive[i] := random(201)-100 ;
// выводим число, если оно больше нуля и кратно двум.
if ((massive[i] > 0) and (massive[i] mod 2 = 0))
then write(massive[i]+' ');
end;
end.
2)
var a :
array [1..50] of integer;
i ,summ: integer;
begin
// рандомизируем сид
randomize();
// инициализируем переменную суммы
summ := 0;
for i := 1 to 50 do begin
// заполняем массив случайными числами от -100 до 100
a[i] := random(201)-100 ;
// суммируем если кратно трем
if a[i] mod 3 = 0 then begin summ := summ + 1; write(a[i] + ' '); end;
end;
// выводим результат
writeln();
writeln('Сумма чисел кратных трем = ' + summ);
end.
В обоих случаях вы не указали какие числа, я использовал промежуток от -64000 до 64000
1)var a,b:array[1..101] of longint;i,n,k:integer;beginfor i:=1 to 100 do a[i]:=random(128000)-64000;for i:=1 to 100 do beginif a[i]>0 then begin b[i]:=a[i];inc(k);end;if a[i]<0 then begin while a[i]>0 doa[i]:=a[i+1];end;end;for i:=1 to k doif b[i]<>0 thenwriteln(b[i]);end.
2)var a:array[1..50] of integer;i,k:integer;beginfor i:=1 to 50 do a[i]:=random(64000)+1;//for i:=1 to 50 do if a[i] mod 3 =0 then writeln(a[i]); если хотите посмотреть на эти числа убрать //for i:=1 to 50 do if a[i] mod 3 =0 then k:=k+a[i];write(k);end.
1)var a,b:array[1..101] of longint;i,n,k:integer;beginfor i:=1 to 100 do a[i]:=random(128000)-64000;for i:=1 to 100 do beginif a[i]>0 then begin b[i]:=a[i];inc(k);end;if a[i]<0 then begin while a[i]>0 doa[i]:=a[i+1];end;end;for i:=1 to k doif b[i]<>0 thenwriteln(b[i]);end.
2)var a:array[1..50] of integer;i,k:integer;beginfor i:=1 to 50 do a[i]:=random(64000)+1;//for i:=1 to 50 do if a[i] mod 3 =0 then writeln(a[i]); если хотите посмотреть на эти числа убрать //for i:=1 to 50 do if a[i] mod 3 =0 then k:=k+a[i];write(k);end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
4. Упрости логическое выражение:A V (- AVB)
Автор: viktort889841
Запиши программы для выполнения проверяемых (на небольшом поле)
Автор: kampina1
Какое минимальное количество бит потребуется для кодирования отрицательных и положительных чисел, меньших от -60 до 60?
Автор: Lomakina-Valerievna1779
Решить олимпиаду по информатике с 2 и до конца с меня 74
Автор: Daulyatyanov1266
Помагите:кто ответит этого тест.Я
Автор: smakejkina
1) 4
2) 1
3) 3
4)2
5)1
6)2
7)3
8) 4
9) 1
10) 2
11) 3