Var a,b : Integer;
Begin
Readln(a,b);
Writeln('Ср.арифм. = ',(a+b)/2);
end.
Ты хотя бы сфотал тетрадь
16384бит равняеться 2048 байт
2048 байт равняеться 2 Кбайтам
Var a,S,P:integer;
Begin
Readln(a);
S:=a*a;
P:=a*4;
writeln('Периметр = ',P,' Площадь = ',S);
readln;
end.
Дано:
N = 34 символа.
n = 10 страниц.
x = 30 строк.
y = 15 символов.
Найти: V.
N = 2^i, где
N - мощность алфавита;
i - количество бит на символ.
V = K * I, где
V - объем;
K - количество символов в сообщении;
K = n * x * y, где
n - количество страниц;
x - количество строк на странице;
y - количество символов в строке.
K = n*x*y = 10*30*15 = 4500 символов в сообщении.
N = 2^i.
34 = 2^i.
I = 6 бит (не можем взять 5 бит, так как 32 < 34. Округляем в большую сторону).
V = K * I = 4500 * 6 = (27000 бит)/8 = 3375 байт.
Ответ: 3375 байт.