Деловая бумага
подтверждает факт или письмо
на нём есть печать
он завершён подписью
1. Добавлено 4 бита, так как в маске 255.255.0.0 - 16 единичных бит,
а в маске 255.255.240.0 - 20 единичных бит
2. Судя по маске получим 16 подсетей, количество битов узлов подсети - 12
3. В каждой подсети по 4094 узлов + адрес подсети + широковещательный адрес
4. Сетевой адрес этой подсети 172.16.64.0
5. Адрес IPv4 первого узла в этой подсети 172.16.64.1
6. Адрес IPv4 последнего узла в этой подсети 172.16.79.254
7. Широковещательный адрес IPv4 в этой подсети 172.16.79.255
Procedure astSquare(n: integer);
var i, j: integer;
begin
for i := 1 to n do
begin
for j := 1 to n do
write('*');
writeln();
end;
end;
{
Для теста:
begin
astSquare(4);
end.
Программа выведет 16 звёздочек:
****
****
****
****
}
var
s,i: integer; {s,i - цел}
begin
s := 0;
for i := 1 to 5 do
s := s + i;
write(s)
end.
Если х единица выводим x (на экране будет 1)
если x двойка выводим x+1 (на экране будет 2)
иначе читаем(вводим) m
конец.