3) сбор сведений об окр.мире и протекающих в них процессах@
Program z4;
var s,l:integer; {объявляем переменные}
begin
s:=0; {начальное значение}
l:=0; {начальное значение}
while l<3 do {пока l<3 выполняем..}
begin {начало цикла}
l:=l+1; {увеличиваем l}
s:=s+l*l; {вычисляем текущее значение s}
end; {конец цикла}
writeln('s = ',s); {выводим s}
end.
В пароле используется 13+10=23 различных символов
Для кодирования 1 символа необходимо log(2)23≈5 бит
Для хранения 1 пароля: 8*5 = 40 бит = 40/8 байт = 5 байт
Для 80 паролей: 80*5=400 байт