1. Единица скорости передачи информации модемом а) бит
б) бод
в) байт
г) Кбайт
2. Услуги, предоставляемые компьютерной сетью, зависят от:
а) типа подключения
б) характеристик модема
в) качества линии связи
г) все перечисленное выше справедливо
3. Провайдер – это
а) Компьютер, предоставляющий транзитную связь по сети
б) Программа подключения к сети
в) Фирма, предоставляющая сетевые услуги
г) Специалист по компьютерным сетям
4. Браузер – это
а) программа просмотра гипертекстовых документов
б) компьютер, подключенный к сети
в) главный компьютер в сети
г) Устройство для подключения к сети
5. Какая из этих программ не является Браузером
а) NETSCAPE NAVIGATOR
б) INTERNET EXPLORER
в) MICROSOFT OUTLOOK
г) NETSCAPE COMMUNICATION
var
n,b,s:integer;
begin
Write('Введите натуральное число и значение b: ');
Read(n,b);
if n>b then Writeln('Неверно')
else begin
s:=0;
while n>0 do begin
s:=s+n mod 10;
n:=n div 10
end;
if s mod 2=0 then Writeln('Верно') else Writeln('Неверно')
end
end.
Программа для 2.
var
k,m,n,b,s:integer;
begin
Write('Введите натуральное число и значения m,n: ');
Read(k,m,n);
if k mod n <> 0 then Writeln('Неверно')
else begin
s:=0;
while k>0 do begin
s:=s+k mod 10;
k:=k div 10
end;
if s>m then Writeln('Верно') else Writeln('Неверно')
end
end.
q: string;
a,i,z,g,b,x,m: Integer;
begin
z:=0;
g:=1;
readln(q,a,b,x,m);
for i:=1 to length(q) do
begin
z:=z+q[i];
end;
if z<a then writeln('Верно, что сумма цифр меньше А') else
writeln('Неверно, что сумма цифр меньше А');
for i:=1 to length(q) do
begin
g:=g*q[i];
end;
if g>b then writeln('Верно, что произведение цифр больше B') else
writeln('Неверно, что произведение цифр больше B');
if x=length(q) then writeln('Верно, что число x значеное') else
writeln('Неверно, что число x значное');
if q[0]>m then writeln('Верно, что его первая цифра превышает m') else
writeln('Неверно, что его первая цифра превышает m');
end.