Тут вообще речь идёт о способах подключения компов по локальной сети - Топология.... способов хватает, так что на твои вопросы ответить можно:
1)либо кольцо, либо шина
2)звезда
3)иерархическая (снежинка)
4)звезда
Есть =)
program z;
var k, x, i: integer;
begin
readln(k);
x:=1;
for i:=1 to k do
begin
if ((x + 1) mod 3 = 0) then x:=x*3
else x:=x+1;
end;
writeln(x);
end.
Var n: integer;
s: string;
begin
writeln('Вводите числа');
repeat
readln(n);
s:= s + IntToStr(abs(n)) + ' '
until n = 0;
writeln(s);
end.
<span>1834(8) - так как максимальный разряд 7, а тут присутствует 8</span>
1А00(2) - A не относится к двоичной системе