Uses crt;
var x,m: array [1..40] of integer;
n,k,c:integer;
begin
readln(n);
c:=1;
for k:=1 to n do
begin
write('x[',k,']:');
readln(x[k]);
end;
k:=1;
repeat
if x[k]>0 then
begin
m[c]:=x[k];
inc(c);
inc(k);
end
else inc(k);
until c=6;
writeln;
for c:=1 to 5 do
writeln('m[',c,']:',m[c]);
<span>end.</span>
Вероятная версия каталога:
E:\\
-Тексты\
--Литература\
---Пушкин\
---Лермонтов\
----Стихи\
Тогда путь к каталогу (Стихи\) будет:
E:\\Тексты\Литература\Лермонтов\Стихи.
1. 1 2 3 4
(WiFi как радиоволна, плюс dialup)
2. 2 3 4 5
3. 1 4 5
4. 1 3
6. 1 2 3 5
(Сис админ не обязан разрабатывать ПО)
Ответ: 256 килобайт.
Объяснение:
8 бит = 1 байт = 2³;
1 килобайт = 1024 байт = 2¹⁰;
2048 килобит =
килобайт.