Если вагонов 8 = 2³, то сообщение о выборе любого вагона несет 3 бита информации.
Сообщение о том, что не выбран конкретный вагон означает, что выбран любой из семи оставшихся и оно несет информацию в размере ㏒₂(8/7) ≈ 0.193 бит
Uses crt;
var xA,xB,yA,yB,D: real;Begin
clrscr;
write('Введите координаты точки A через пробел: ');
readln(xA,yA);
write('Введите координаты точки B через пробел: ');
readln(xB,yB); d:=sqrt(sqr(xA-xB)+sqr(yA-yB));
writeln;
writeln('Длина отрезака AB = ',d:0:3)
End.
Расширение файла 1) ppt.
Расширение файла отделяется от имени файла точкой.