Var x,y:real; i:integer;
begin
write('x = ');
readln(x);
y:=0;
if x>0
then for i:=1 to 10 do y:=y+1/((2*i-1)*x)
else if x<0 then for i:=1 to 10 do y:=y+1/(2*i*x);
writeln('y = ',y:5:3);
end.
Пример:
x = -2
y = -0.732
Ответ - 731
Удачной учебы)
Посчитаем количество символов в сообщении:
6 * 35 * 50 = 10500
Всего бит информации в сообщении:
7875 байт = 7875 * 8 бит = 63000 бит
Тогда один символ несёт иформации:
63000 бит / 10500 = 6 бит
Значит, в алфавите 2^6 = 64 символа
На локальном диске (:С) или на флешке ,или на диске.
Во внешней папяти