Перевел всё в К<span>байт
7) 0.001 </span>Кбайт<span>
4) 0.12825 </span>Кбайт<span>
2) 1.02425 </span>Кбайт<span>
3) 1 </span>Кбайт<span>
5) 1.028 </span>Кбайт<span>
6) 8 </span>Кбайт<span>
1) 8.194 </span>Кбайт
При использовании 16777216 цветов для хранения одного пикселя необходимо log(2)16777216 = 24 бита. (2^24 = 16777216)
Информатика && язык & запрос && Я н д е к с
Запрос Я н д е к с у на поиск по условию:
На странице должно быть слова "информатика", "Я н д е к с" и предложение, в котором одновременно присутствуют слова "язык" и "запрос"
Примечание: Я н д е к с надо писать слитно, местная система не любит этого имени и не позволяет его записать в обычном виде.
Function fac(a:integer):int64;
Var i,b:integer;
Begin
b:=1;
for i:= 1 to a do
b:=b*i;
fac:=b;
End;
Var
i,n:integer; s:real;
Begin
s:=1;
Write('Введите число n: ');
Readln(n);
for i:= 1 to 2*n do
s:=s+1/fac(i);
Write(s);
End.
В 8 литровом оставить 4 литра и остальные 4 разделить в 5 литровый