O__o
var
i, s : Integer;
begin
for i := 1000 to 9999 do
if (i * 4 >= 1000) and (i * 4 <= 9999) then
begin
s := i * 4;
if ((i mod 100) div 10 = ( s div 1000)) then
if ((i mod 10) = ( s mod 1000) div 100) then
if ( i div 1000 = (s mod 100) div 10) then
if ( ((i mod 1000 div 100) <> i div 1000) and ((i mod 1000 div 100) <> (i mod 100) div 10) and ((i mod 1000 div 100) <> i mod 10)) then
if ( (s mod 10 <> s div 1000) and (s mod 10 <> (s mod 1000) div 100) and (s mod 10 <> (s mod 100) div 10)) then
Writeln(i, ' = ', i * 4);
end;
Readln;
end.
1)совместное использование информации пользователями, работающими на удаленных друг от друга компьютерах;
2) одновременная работа с документами. и программами;
3) совместное использование принтеров и других периферийных устройств.
2 ответ Протокол IP используется для адресации компьютеров в сети. В каждом пакете информации, передаваемом по сети, указан IP-адрес компьютера, благодаря которому информация и попадает по назначению. IP-адрес состоит из четырех номеров, разделенных точками. Каждое число в этом адресе занимает длину, равную одному байту, поэтому может принимать значения от О до 255.
5 КБ, 6144 байт, 3 456 789 бит, 1МБ
Объяснение:
5 КБ = 5120 байт = 40 960 бит
6144 байт = 49 152 бит
3 456 789 бит
1 МБ = 1024 КБ = 1 048 576 байт = 8 388 608 бит