на страницах сети интернет найдите информацию об устройствах необходимых для создания сети. перечень оборудования необходимого для организации локальных сетей запишите в тетрадь

на паскале:

var

n,s,p: integer;

begin

read(n);

p: =n mod 10;

if p mod 2=0 then writeln ('оканчивается на четную цифру')

                    else writeln ('оканчивается на четную цифру');

while n> 0 do

begin

n: =n div 10;

s: =s+1;

end;

writeln ('количество цифр в числе', s);

end.

3 базовых цвета

2 бита - 4 варианта 

4*4*4=64 цвета

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

или

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;

февраль зимний месяц

май весенний месяц

август летний месяц 

сентябрь осенний месяц