Вопрос 1. выберите домен верхнего уровня в интернете, принадлежащий россии: *
ru
ro
rus
ra
вопрос 2. интернет – это: *
локальная сеть
корпоративная сеть
сеть
региональная сеть
вопрос 3. задан адрес сервера интернета: каково имя домена верхнего уровня? *
www. mipkro. ru
mipkro. ru
ru
/>вопрос 4. для работы в сети через телефонный канал связи к компьютеру подключают: *
адаптер
сервер
модем
коммутатор
вопрос 5. модем – это …, согласующее работу … и телефонной сети. вместо каждого многоточия вставьте соответствующие слова: *
устройство; программы
программа; компьютера
программное обеспечение; компьютера
устройство; дисковода
устройство; компьютера
вопрос 6. сети, объединяющие компьютеры в пределах одного региона: *
локальные
региональные
корпоративные
почтовые
вопрос 7. сети, объединяющие компьютеры в пределах одной отрасли, корпорации: *
локальные
региональные
корпоративные
почтовые
вопрос 8. организация-владелец узла сети: *
хост-компьютер (узел)
провайдер
сервер
домен
вопрос 9. выберите из предложенного списка ip-адрес: *
178.126.7.29
34.89.45
11.256.34.21
edu.ru
вопрос 10. петя записал ip-адрес школьного сервера на листке бумаги и положил его в карман куртки. петина мама случайно постирала куртку вместе с запиской. после стирки петя обнаружил в кармане четыре обрывка с фрагментами ip-адреса. эти фрагменты обозначены буквами а, б, в и г. восстановите ip-адрес. в ответе укажите последовательность букв, обозначающих фрагменты, в порядке, соответствующем ip-адресу. *
подпись отсутствует
вопрос 11. петя записал ip-адрес школьного сервера на листке бумаги и положил его в карман куртки. петина мама случайно постирала куртку вместе с запиской. после стирки петя обнаружил в кармане четыре обрывка с фрагментами ip-адреса. эти фрагменты обозначены буквами а, б, в и г. восстановите ip-адрес. в ответе укажите последовательность букв, обозначающих фрагменты, в порядке, соответствующем ip-адресу. *
подпись отсутствует
вопрос 12. что такое доменный адрес? *
вопрос 13. *
подпись отсутствует
вопрос 14. *
подпись отсутствует
const
nn=30;
mm=30;
var
a:array[1..mm,1..nn] of integer;
m,n,i,j,imax,imin,jmax,jmin:integer;
begin
Writeln('Введите число строк и столбцов массива: '); Read(m,n);
Randomize;
Writeln('*** Исходный массив ***');
imin:=1; jmin:=1; imax:=1; jmax:=1;
for i:=1 to m do begin
for j:=1 to n do begin
a[i,j]:=Random(51)-25;
Write(a[i,j]:4);
if a[i,j] mod 2 = 0 then begin
if a[i,j]<a[imin,jmin] then
begin imin:=i; jmin:=j end
else
if a[i,j]>a[imax,jmax] then
begin imax:=i; jmax:=j end
end
end;
Writeln
end;
Writeln('*** Результирующий массив ***');
for i:=1 to m do begin
for j:=1 to n do begin
if (i=imin) and (j=jmin) or (i=imax) and (j=jmax) then a[i,j]:=2*a[i,j]
else a[i,j]:=3*a[i,j];
Write(a[i,j]:4)
end;
Writeln
end
end.
Тестовое решение:
Введите число строк и столбцов массива:
10 8
*** Исходный массив ***
-18 9 23 -18 -3 12 4 -22
16 -24 7 -1 11 5 21 -25
20 -11 14 -13 13 -21 13 -2
-20 2 10 -19 -4 5 -7 -21
16 17 -11 1 2 -18 21 0
-2 -10 -6 3 25 16 5 -9
-12 9 7 -21 22 -1 -25 -23
22 0 -24 21 -23 -3 7 -15
8 3 8 20 -10 -5 -2 13
-6 -12 15 -3 11 -16 -1 -10
*** Результирующий массив ***
-54 27 69 -54 -9 36 12 -66
48 -48 21 -3 33 15 63 -75
60 -33 42 -39 39 -63 39 -6
-60 6 30 -57 -12 15 -21 -63
48 51 -33 3 6 -54 63 0
-6 -30 -18 9 75 48 15 -27
-36 27 21 -63 44 -3 -75 -69
66 0 -72 63 -69 -9 21 -45
24 9 24 60 -30 -15 -6 39
-18 -36 45 -9 33 -48 -3 -30
problems : array [0..9] of String = ('x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10','x1+5=10', 'x1+5=10', 'x1+5=10');
answers : array [0..9] of String = ('-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5');
var
countOfAnswers, counter: integer;
userAnswer: String;
begin
countOfAnswers := 0;
for counter:=0 to 9 do
begin
write('Введите ответ уравнения ', problems[counter], ' : ');
readln(userAnswer);
if userAnswer = answers[counter] then Inc(countOfAnswers);
end;
if countOfAnswers > 8 then writeln('Отлично')
else if countOfAnswers > 5 then writeln('Хорошо')
else writeln('Плохо');
end.