Фирма под офис сняла этаж в офисном здании. Имеется пять комнат для организации пяти отделов: администрация; серверная; бухгалтерия и отдел кадров; конференц-зал; а так же openspace для рядовых сотрудников. Необходимо составить логическую модель сетевой инфраструктуры такого офиса, исходя из таких соображений, что в фирме по факту имеется два человека высокого начальства, главный бухгалтер, кадровик, системный администратор и десять сотрудников (однако планируется расширение штата). Соответственно должно быть предусмотрено деление на подсети, а так же возможность обмена файлами и сообщениями внутри офиса. Так же, в связи с планируемым расширением штата, необходимо предусмотреть возможность оперативного расширения сети.
const
alpha=['a'..'z'];
digits=['0'..'9'];
var
na,nd,i:integer;
s:string;
begin
na:=0; nd:=0;
Write('Введите текст: '); Readln(s);
for i:=1 to Length(s) do
if s[i] in alpha then Inc(na)
else
if s[i] in digits then Inc(nd);
if na>nd then Writeln('В тексте больше букв')
else
if na<nd then Writeln('В тексте больше цифр')
else Writeln('В тексте букв и цифр поровну')
end.
Тестовое решение:
Введите текст: the equation 3.546x^2+4.18x-4.1=0
В тексте больше букв