Є база даних магазину продажу автомобілів. Визначте типи зв'язків, які тре ба встановити між обектами таблиць Магазин та Автомобіль за умов: а) е кілька магазинів і кілька моделей автомобілів, у кожному магазині е автомобілі тільки однієї моделі і кожна модель автомобіля продаеться тільки в одному магазині; б) е тільки один магазин і він продае автомобілі однієї моделі;

в) є кілька магазинів і всі вони продають автомобілі однієї моделі; г) е кілька магазинів і є кілька моделей автомобілів, у кожному магазині

е автомобілі всіх моделей: д) е один магазин і він продае автомобілі кількох моделей.​

Здравствуйте сегодня мы разберем правила работы с интернетом. Интернет это большая сеть которая покрывает весь мир. Бывают много видов интернета начиная с Wi-Fi, Enthernet заканчивая VPN Моб.данные и другие. Сначала давайте разберем что такое интернет и зачем он нам нужен.

Интернет-Сеть покрывшая землю и подсоеденненвя уже почти к каждому гаджету с разных сервисов самые популярные WiFi и Enthernet интернет придназначен для того чтобы делиться информацией по этой сети интернета с одного компьютеоа на другой с малейщими задержками ( ping m/s).Преступим к правилам!

1. Не разглашай свои пароли от соц.сетей и от другиз сервисов.

2.Бужь осторожен не заходи на странные неизвемтные сайты по крайней мере будь защищен антивирусом хоть они и в некоторых случаях не являются защитой!

3. Не скачивай игры,софты,приложения с пиратских сайтов многие из них захватывают с собрй пару не нужных приложений а также вирусы (браузерные)

4. Если ты увидишь подозрительную рекламу в интернете не жми это возможно мошенники

5. Не разговаривай с посторонними

6. Также не разглашай данные банк.карточки на посторонних сайтов и не говори пин код карты! Его никто не имеет право спросить!

На этом все желаю вам чтобы вы не попадались на уловки мошенников. УДАЧИ!

Free Pascal

var

 a : array of array of integer;

 b : array of integer;

 s, i, j, n, m : integer;

begin

 writeln('Введите кол-во строк:');

 readln(m);

 writeln('Введите кол-во столбцов:');

 readln(n);

 randomize;

 setlength(a, n);

 setlength(b, m);

 for i:=0 to n-1 do

   setlength(a[i], m);

 for j:=0 to m-1 do begin

   s:=0;

   for i:=0 to n-1 do begin

     a[i,j] := random(50) - 25;

     if a[i,j] <0 then inc(s);

     write(a[i, j], '  ');

   end;

   b[j]:=s;

   writeln();

 end;

 writeln('--------------------------');

 for j:=0 to m-1 do

   writeln(j+1,' строка = ', b[j]);

end.