Основные методы доступа к интернету — dial-up, наземные линии (через коаксиальный кабель, оптоволокно или медные провода) , цифровые телекоммуникационные линии, wi-fi, спутник и сотовые телефоны. dial-up — распространённый тип соединения, предоставляемый провайдерами (поставщиками услуг интернета) , также самый медленный и, обычно, наименее дорогой. соединение dial-up позволяет пользователям соединяться с интернетом через местный сервер, используя стандартный модем; компьютер осуществляет набор телефонного номера, предоставленного провайдером, по нему соединяется с модемом сервера и, таким образом, со всем интернетом. таким образом, подсоединённые пользователи могут осуществлять поиск по всей всемирной паутине, однако, по сравнению с современными скоростями широкополосного доступа в интернет, dial-up являет собою медленное соединение и может номинально передавать данные лишь со скоростью 56 килобит в секунду, при прочих равных условиях. соединения на базе асимметрических цифровых абонентских линий (adsl) обеспечивают широкополосный доступ в интернет, становятся всё более доступны и могут обеспечивать интернет-соединение превосходного качества. эти соединения работают посредством разделения функции телефонной линии на отдельные каналы для голосовых телефонных вызовов и для передачи информации. таким образом, пользователь одновременно может разговаривать по телефону и быть соединённым с интернетом. услуги на базе adsl с разными скоростными спецификациями, ниже некоторые общераспространённые конфигурации: (скорость загрузки/выгрузки) * 256 кбит в сек/128 кбит в сек * 512 кбит в сек/128 кбит в сек * 1 мбит в сек/256 кбит в сек
Спасибо
Ответ дал: Гость
program xxx;
var i, k, d, e, s : integer;
begin
k: =0;
for i: = 10 to 99 do
begin
d: = i div 10;
e: = i mod 10;
s: =d + e;
if i mod s = 0 then k: =k+1
end;
write ('кол-во чисел которые делятся на сумму своих цифр=', k);
readln
end.
Ответ дал: Гость
1)
var a, b: integer;
begin readln(a, b); if (a div 10 + a mod 10) > (b div 10 + b mod 10) then writeln('сумма цифр ', a, ' больше') else writeln('сумма цифр ', b, ' больше'); end.
2)
var a: integer;
begin readln(a); writeln((a mod 10) * 10 + a div 10); end.
3)
var a: integer;
begin readln(a); if ((a div 100) = (a mod 100) div 10) or ((a div 100) = (a mod 10)) or ((a mod 100) div 10 = (a mod 10)) then writeln('есть 2 одинаковые цифры') else writeln('нет 2-х одинаковых цифр'); end.
Популярные вопросы