1. Компьютеры одной организации, связанные каналами передачи информации длясовместного использования общих ресурсов и периферийных устройств и находящиеся водном здании, называют сетью: 3) локальной
2. Компьютер, предоставляющий свои ресурсы другим компьютерам при совместной работе,называется: 2) сервером
3) Выберите правильные ответы: 1) Каждый компьютер, подключенный к локальной сети, должен иметь сетевую карту Неверные ответы: 2) Одноранговые сети используются в том случае, если в локальной сети более 10 компьютеров (одноранговые сети как правило используются для маленьких сетей) 3) Сервер – это мощный компьютер, необходимый для более надежной работы локальной сети (сервер как правило, но не обязательно, мощнее, но уж точно нужен не для надёжности) 4) Сеть на основе сервера – когда все компьютеры локальной сети равноправны (не все равноправны - есть сервер и клиенты)
4. Интернет – это: 3) глобальная сеть
8. Сети, объединяющие компьютеры в пределах одного региона: 2) региональные
9. Сети, объединяющие компьютеры в пределах одной отрасли, корпорации: 3) корпоративные
10. Выберите из предложенного списка IP-адрес: 1. 193.126.7.29 (IP-адрес версии 4 - 4 числа от 0 до 255, разделённых точками)
12. Web-браузер – это: 4) клиент-программа WWW, обеспечивающая пользователю доступ к информационным ресурсам Интернета
13. Сеть, в которой каждый пользователь сам решает вопрос доступа к своим файлам, называют 3) одноранговой компьютерной сетью
14. Компьютер, подключенный к Интернет, обязательно имеет: 1) IP-адрес
n = 10;
var
a: array[0..10] of integer;
i, s: integer;
begin
//Заполнение массива сл. числами
for i := 1 to n do
begin
a[i] := random(201) - 100;
write(a[i]:4);
end;
writeln;
//1) Все элементы не превышающие число 100
writeln('Не больше 100 ');
for i := 1 to n do
if a[i] <= 100 then
write( a[i]:4);
writeln;
// 2) Все четные элементы
writeln('Кратные двум ');
for i := 1 to n do
if a[i] mod 2 = 0 then
write( a[i]:4);
writeln;
// 3) Все элементы, являющиеся трехзначными числами
writeln('Трехзначные ');
for i := 1 to n do
if (a[i] < -99) or (a[i] > 99) then
write(a[i]:4);
writeln;
// 4) Третий, шестой и т.д элементы.
i := 3;
writeln(' номера 3, 6, 9 и т.д.');
while i < n do
begin
write(a[i]:4);
i := i + 3;
end;
end.