1) Приведите примеры иерархической и сетевой баз данных, Соз дайте их схемы с средств OpenOffice. 2) Создайте базу данных «Мои друзья» с использованием следую щих типов полей: текстовое, числовое, дата/время, логическое​

"Я самый главный!"- заявил монитор, на мне возникает информация и изображения.

"Нет, я самая главная,- сказала клавиатура, без меня никак, не сможешь ничего оттреадактировать,вбить информацию в память, общаться - да вообще ничего!"

Но память возразила : " Ээх вы, я тут главнее всех, как вы без меня! Ничего не сохранишь, не запомнишь, да в общем без меня очень сложно что-то представить!"

"Да вы что? - начал возмущаться процессор, - Главных не должно быть, мы все представляем собой одно целое!" Так они и воссоединились и представляют собой одну частичку главного . 

Проверено на Паскале АВС:

Program Studentka;
uses crt;
const n = 10;
const m = 15;
var
  matrix:array [1..n,1..m] of integer;
  i,j,max,odd: integer;
begin
  {заполняем массивы случайными числами}
  randomize;
  writeln('Массив А:');
  for i:=1 to n do
    begin
      for j:=1 to m do
      begin
        matrix[i,j]:=random(101)-50;
        write(matrix[i,j]:4);
      end;
      writeln();
    end;
{просматриваем столбцы}
  writeln('Нечётные элементы каждого столбца:');
  for j:=1 to m do
    begin
      odd:=0;
      for i:=1 to n do
        begin
          if matrix[i,j] mod 2 <>0 then odd:=odd+1;
        end;
      write(odd:4);
    end;
  writeln();
 {просматриваем нечётные строки}
  writeln('Максимум из отрицательных элементов в нечётных строках:');
  for i:=1 to n do
    begin
      if i mod 2 = 1 then
        begin
          max:=-99;
          for j:=1 to m do
            begin
              if (matrix[i,j]<0) and (matrix[i,j]>max) then
                max:=matrix[i,j];    
            end;
          if max=-99 then  
              writeln('Строка ',i,' не содержит отрицательных элементов')
            else
              writeln('Строка ',i,'   Максимум=',max);
        end;
    end;
end.