Java тілінің тарихы және басқа тілдерден артықшылықтары мен кемшілігі реферат

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-адрес

1)

Program Pr1;
uses crt;
var mas:array[100..999] of integer;
i:integer;
Begin
clrscr;
for i:=100 to 999 do mas[i]:=i; {1 sposob}
for i:=100 to 999 do if mas[i] mod 9 =0 then writeln(mas[i]);
i:=100; {2 sposob}
while i<=999 do begin
if mas[i] mod 9=0 then writeln(mas[i]);
i:=i+1;
end;
i:=100; {3 sposob}
repeat
if mas[i] mod 9=0 then writeln(mas[i]);
i:=i+1
until i=999
end.

2)

Program Pr1;
uses crt;
var mas:array[100..999] of integer;
i,v:integer;
Begin
clrscr;
v:=0;
for i:=100 to 999 do mas[i]:=i; {1 sposob}
for i:=100 to 999 do if mas[i] mod 17 =0 then v:=v+mas[i];
writeln(v);
i:=100; {2 sposob}
v:=0;
while i<=999 do begin
if mas[i] mod 17=0 then v:=v+mas[i];;
i:=i+1;
end;
writeln(v);
i:=100; {3 sposob}
v:=0;
repeat
if mas[i] mod 17=0 then v:=v+mas[i];
i:=i+1
until i=999;
writeln(v);
end.