X - количество вагонов, тогда вероятность того, что выбора купейного вагона p = x/28
I = log(2){1/(x/28)} =2
28/x =4
x =7
Ответ: 7 купейных вагонов
Если всё так как написанно, то программа вообще не скомпилируется. Должно быть
a:=1;b:=1;
while a<2 do
begin
b:=b+2;
end;
s:=a+b;
в теле цикла переменная а не изменяется, поэтому цикл будет бесконечным. То есть пока Ctrl-Break не нажмешь будет кажаться что программа зависла.
Не понимаю тебя ссори что не помог
Var a,b,c:longint;
Begin
read(a,b,c);
writeln(a+b+c);
End.
В кодировке вин-1251 один символ весит 8 бит или 1 байт
Общий вес текста/сообщения
I = K * i (K - кол-во символов, i - вес одного символа/бит на символ)
K = 1536 шт
Вес текста I = 1536 * 8 бит = 12288.0 бит =
= 1536.0 байт = 1.5 Кбайт = 0.00146484375 Mбайт