// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var a:=ArrRandom(30,-5,50); a.Println;
Writeln('k=',a.Where(x->x<0).Count)
end.
<u><em>Тестовое решение:</em></u>
24 39 36 2 -3 -3 29 32 24 -3 11 14 17 -4 -1 13 13 36 24 49 41 27 17 20 24 32 36 -2 -1 7
k=7
# # Код на ruby 2.2.3p173
def NtoR(n)
t = n.to_i
k = 0
while t > 0 do
k += t % 2
t = t / 2
end
if k % 2 == 0 then
return n * 2**2
else
return n * 2**2 + 1 * 2
end
end
min = 1000
for i in 1..200
r = NtoR(i)
min = r if (r > 180) and (min > r)
end
p min
Ответ 184
а) 7 Кбайт = 7168 байт = 57344 бит
б) 1,5 Кбайт = 1536 байт = 12288 бит
в) (тут будет каша из цифр после запятой - 0.030517578125) Кбайт = 31,25 байт = 250 бит
г) 1,5 Гбайт = 1536 Мбайт = 1572864 Кбайт = 1610612736 байт
'В озеро Байкал впадает 336 рек' - 30 символов, 30*8 = 240 бит = 15 байт
250 страниц * 30 строк * 50 символов * 8 бит = 3000000 бит = примерно 366 Кбайт
Тут нет правильного варианта т.к. входной поток должен иметь 3 значения а тут везде 4, но если результат ввода не важен то ответ 3
Што нужно зделать ? я не понимаю