<u>// PascalABC.NET 3.3, сборка 1634 от 14.02.2018</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
var n:=ReadInteger('n=');
var p:=0;
for var i:=1 to n do begin
var (k,s):=(i,0);
while k>0 do begin
s+=k mod 10;
k:=k div 10
end;
if i mod s=0 then p+=1
end;
Writeln(p)
end.
ЛВС - это локальная сеть, в нее можно подключить серверы, она состоит из ПК и Раб. Станций и обмениваются данными по средствам линии передачи данных. А принтеры подключаются к компьютерам и не входят в локальную сеть.
64 Мбайт = 64*1024 Кбайт = 64*1024*1024 байт = 64*1024*1024*8 бит =
2^6*2^10*2^10*2^3 бит = 2^29 бит
16 = 2^4
16^(4*x) = 2^29
4*x = 29 ⇒ x=29/4 = 7,25