Информатика с тестом там вопросы 1. Правомерно ли было скачивание изображений с данного сайта?
2. Правомерно ли использование статьи из книги о кофе?
3. В «подвале» сайта Алексей разместил сайт копирайта. Как он выглядит?

варианты ответов в первых двух либо да либо нет и в последнем @,$, и c

Компьютерная сеть - это совокупность компьютеров, взаимо­связанных через каналы передачи данных для обеспечения обмена информацией и коллективного доступа пользователей к аппаратным, программным и информационным ресурсам сети.

В общем случае для создания компьютерных сетей требуется наличие линии связи между компьютерами (канала передачи дан­ных), специального аппаратного обеспечения (сетевого оборудова­ния) и специального программного обеспечения (сетевых программ­ных средств).
Компьютерные сети предназначены:

• для обмена данными между ПК;

• для совместного использования вычислительных ресурсов. Ресурсы бывают трех типов:

• аппаратные (принтер, емкости жестких дисков);

• программные;

• информационные.

Когда все участники небольшой компьютерной сети пользуют­ся общим принтером, то они разделяют общий аппаратный ресурс. В сети может находиться один компьютер с увеличенной емкостью жесткого диска (файл-сервер), на котором участники сети хранят свои архивы и результаты работы. В этом случае аппаратным ресур­сом является внешняя память сетевого компьютера. Другой распро­страненный пример: предоставление услуг хостинга - возможности размещенияweb-страниц и других пользовательских файлов на сер­вере в Интернет.

Пример совместного использования программных ресурсов: для выполнения очень сложных и продолжительных расчетов воз­можно подключение к удаленной большой ЭВМ, при этом сущест­вует возможность отправить на нее вычислительное задание, а по окончании расчетов точно так же получить результат обратно.

Информационные ресурсы образуют данные (текст, графиче­ские изображения, аудио- и видеоинформация), хранящиеся на уда­ленных компьютерах. Пример: Интернет воспринимается как ги­гантская информационно-справочная система.

Различают следующие виды компьютерных сетей:

• локальные, которые используются для обмена информацией между ПК, расположенными на ограниченной территории (уда­ленными на небольшие расстояния) в пределах одного здания или в рамках одной организации. При этом, как правило, используются проводные линии связи;

• региональные, связывающие компьютеры отдельной страны или экономического региона;

• глобальные, используемые для связи компьютеров разных стран, континентов.

Глобальная сеть Интернет - это всемирное объединение раз­личных региональных и корпоративных компьютерных сетей, обра­зующих единое информационное пространство благодаря использо­ванию общих стандартных протоколов передачи данных.

Основной стандартный протокол в Интернете – TCP/IP(-InternetProtocol).

Протокол - совокупность правил и соглашений, регламенти­рующих формат и процедуру передачи данных между двумя или не­сколькими независимыми устройствами или процессами. Выбор протокола ТСРЛР был обусловлен исторически.

1)program fagasg;
var x1,y1,r: real;
begin
Writeln('Введите х1');
readln(x1);
Writeln('Введите у1');
readln(y1);
r:=sqrt(x1*x1+y1*y1);
Writeln('Расстояние от х1 до у1=',r);
end.
2)Program fsgasghfd;
var c,s: real;   
a,b: integer;
begin
Writeln('Введите первое целое число');
readln(a);
Writeln('Введите второе целое число');
readln(b);
Writeln('Введите дробное число');
readln(c);
If ((a>0) and (b>0) and (c>0)) or ((a<0) and (b<0) and (c<0)) then 
s:=a+b+c
else writeln('Знаки разные');
If ((a>0) and (b>0) and (c>0)) or ((a<0) and (b<0) and (c<0)) then Writeln('Сумма чисел:',s);
end.
3)Program wrqrwqr;
var A: Array[1..100] of integer;   
B: Array[1..100] of integer;   
C: Array[1..100] of integer;   
s,i,h,g: integer;
begin
h:=0;
g:=0;
Writeln('введите размерность массива');
readln(s);
Writeln('Вводится первый массив');
For i:=1 to s do 
begin   
Writeln('Введите элемент массива №',i);   
readln(A[i]); 
end;
Writeln('Вводится второй массив');
For i:=1 to s do 
begin   
Writeln('Введите элемент массива №',i);   
readln(B[i]); 
end;
For i:=1 to s do  begin   
If A[i]>B[i] then C[i]:=A[i]     
else C[i]:=B[i];   
If C[i] mod 2=1 then h:=h+1;   
If C[i] mod 2=0 then g:=g+1; 
end; 
Writeln('Количество нечётных элементов в массиве:',h); 
Writeln('Количество чётных элементов в массиве:',g);
end.