X - количество вагонов, тогда вероятность того, что выбора купейного вагона p = x/28
I = log(2){1/(x/28)} =2
28/x =4
x =7
Ответ: 7 купейных вагонов
Var st,sk:integer;
begin
readln(st);
if st>1000
then sk:=trunc(st*0.95)
else if st>500 then sk:=trunc(st*0.97)
else sk:=st;
writeln(sk);
end.
Пример:
3000
2850
Подпр1(A,B,B) - аргумент X функции - это А = 3, аргумент Y функции - B=5, результат - аргумент F, то есть возврат значения B
X = X + 2 = 3 + 2 = 5
Y = Y + 3 = 5 + 3 = 8
F = X + Y = 13
B = 13
Ответ: 13
<span>1920x1080 расшерение екрана </span>