Const n=5;m=10; var b:array[1..n,1..m]of integer; i,j,k,buf,l:integer; begin for i:=1 to n do begin writeln; for j:=1 to m do begin b[i,j]:=random(50); write(b[i,j]:4); end; end; writeln; for j:=1 to m do begin k:=0; for i:=1 to n-1 do if b[i,j]<b[i+1,j]then k:=k+1; if k=n-1 then buf:=buf+1; end; k:=0; for l:=2 to m do if l mod 2=0 then for i:=1 to n-1 do for j:=i+1 to n do if b[i,l]>b[j,l]then begin k:=b[i,l]; b[i,l]:=b[j,l]; b[j,l]:=k; end; writeln('увеличилось ',m div 2-buf); for i:=1 to n do begin writeln; for j:=1 to m do write(b[i,j]:4); end; end.
Самыми используемыми являются: •Соединение через модем(модемное)- ADSL •Через моб. телефон(мобильное)- GPRS •Спутниковый •Оптоволокно(соединение по выделенной линии)
Соединение по выделенному каналу. После подключения, провайдер/абонент проводит до нужного места оптоволокно или витую пару. Хоть это не самое дешевое решение для подключения к интернету, но зато абонент получает разделенные интернет и телефонную линию, высокую скорость, в пределах 100МБит/сек и за счет определенного диапазона IP-адресов хорушее качество соединения.
Единственным минусом тут является относительно дорогая прокладка кабеля(чем большее расстояние вы прокладываете, тем больше платить), особенно в регионах стран.
З них непарні: 1, 3, 5, 7, 9, 11, 13, 14, 15, 17, 19, 21, 23, 25
З них не містять цифр 1, 5, 7: 3, 9, 21
З них не діляться на 3: 21
Відповідь: це число 21