1)
const
n=12;
var
i,p:integer;
begin
p:=1;
for i:=1 to n do
p:=p*i;
writeln(P);
<span>end.
2)
const
n=7;
varc:array[1..7]of integer;
i,s:integer;
begin
for i:=1 to n do
begin
readln(c[i]);
s:=s+c[i];
end;
writeln(s)
<span>end.
</span>3)
const
a=20.3;
var
x,y:real;
begin
readln(x);
if x>1 then y:=ln(x+1)
else y:=sqr(cos(sqrt(abs(a*x))));
writeln(y);
<span>end.</span></span>
1. Количество чисел = 2^5 = 32
2. Если символ кодируется одним байтом, то:
150*40*60*1 байт = 150*40*60/1024 Кбайт = 351,5625 Кбайт
3. Память для одного символа = log(2)8 = 3 бита. Количество информации в сообщении = 13*3 = 39 бит.
4. Количество символов = 3*25*60; 1125 байт = 1125*8 бит;
память для одного символа = 1125*8/(3*25*60) = 2 бита.
Количество символов в алфавите = 2^2 = 4
1- будет 11010011<span>2
2- </span>62 = 111110<span>2
3- </span>122 = 1111010<span>2
Числа я написал, ответ думаю сможешь написать. Сказать как переводить?
Если тебе надо перевести из десятичной в двоичную, ты делишь это число столбиком на 2, каждый раз у тебя будет оставаться остаток 0 или 1, это числа ты записываешь и в конце деления те числа (остатки) ты пишешь задом на перёд. Например десятичное число 11 переводим в двоичную:
11делим на 2 = 5 ( остаток 1) записываем 1
5делим на 2 = 2 ( остаток 1 ) записываем 1
2 делим на 2 = 1 ( остаток 0 ) записываем 0
1 делим на 2 = 0 (остаток 1) записываем 1
получили 1101, переворачиваем, получаем 1011-это "11" в двоичной системе
</span>
