I) компьютерная
II) Локальной сети
III) Топология Звезда:
1)Выход из строя одной рабочей станции не отражается на работе всей сети целом.
2) Лёгкий поиск неисправностей и обрывов в сети.
3) Высокая производительность сети.
4)Гибкие возможности администрирования.
//PascalABC.Net 3.2
{2}
function f(x:real):real;
begin
if x>0 then result:=x/3 else result:=x*sqr(x);
end;
begin
write (f(readreal('x =')));
end.
{3}
begin
var cat:=readinteger('Введите начальное кол-во:');
var count:=0;
if cat<2 then write ('Никогда') else
if cat>100 then write ('Уже не хватает') else begin
repeat
count+=1;
cat+=cat div 2;
until cat>100;
print ('Через', count, 'недели');
end;
end.
1.редактирование
2.кодировка
3. двоичный код весит 1 бит/один символ
Program Z_n;
var a,b:integer;
Begin
Readln(a);
Readln(b);
If a>b then begin write(b,' '); writeln(a); end
else begin write(a,' '); writeln(b); end;
end.
P.s Числа вводите через enter( Ввели число, нажали enter, потом ввели второе число)