да поместится потому что на дискете 1,4 мб
Смотря по задаче ты всё правильно решил.
N у тебя это мощность алфавита
отсюда узнаём вес символа 64=2^6 -> 6
количество символов будет 256 на 128 = 32 768
информационный объём равен количество символов на вес одного символа
32 768 * 6 = 196 608
Тут у тебя всё полностью правильно. только вместо большой i (ай английской) около =6 поменяй на маленькую как в 2^i
Var
S:real;
n:integer;
Begin
S:=0;
Write('n = ');
ReadLn(n);
For n:= 1 to n do
S:=S+n/(n+1);
WriteLn('S = ',S)
End.
<span>a = 4
b = 9
b = 6 * b – a = 6*9-4 = 54-4 = 50
a = b / 5 * 3 – a = 50/5*3-4 = 10*3-4 = 30-4 = 26
Ответ: 26</span>
Var x,y:real;
begin
write('x = '); readln(x);
if x<-8
then y:=exp(x*ln(0.5))+3
else if x<=0 then y:=sin(x-3) else y:=3*x-3;
writeln('y = ',y);
end.
Пример:
x = 4
y = 9