Паскаль. написать программу по формуле:

pascalabc.net

begin

  var x : = readreal('x =');

  var y : = 2 * (x + 3) + sqr(3 / (1 - 4 * x));

  println(y)

end.

примечание. при х = 0.25 в знаменателе образуется ноль. в этом случае программа выдаст значение infinity (бесконечность).

1 simvol zanimaet 1 bait(tak kak imeem tekst);

tekst shpargalki sostavliaet 50*50=2500 simvolov-2500 bait.

da + eshe 0,3*2500=750.

vsego 2500+750=3250 bait.

x - информационный вес одного символа

n - мощность алфавита (кол-во символов)

размер содержащейся в тексте информации находим по формуле:  

k - кол-во символов в тексте 

амазонка 

- один символ несет 8 битов (1 байт)

- байт в письме амазонки

омега:  

один символ несет 7 битов

байт в письме омеги