Пожалуйста, составьте алгоритм-блок схему определения расстояния между смежными

Пожалуйста, составьте алгоритм-блок схему определения расстояния между смежнымисветофорами. На железнодорожных линиях, оборудованных автоблокировкой с трехзначной сигнализацией, расстояние между смежными светофорами должно быть не менее тормозного пути, определенного для данного места при полном служебном торможении на максимальной реализуемой скорости, но не более 120 км/ч для пассажирских поездов и 80 км/ч для грузовых поездов, и, кроме того, должно быть не менее тормозного пути при экстренном торможении с учетом пути, проходимого поездом за время, необходимое для воздействия устройств автоматической локомотивной сигнализации на тормозную систему поезда. При этом на участках, где видимость сигналов менее 400 м, а также на железнодорожных линиях, вновь оборудуемых автоблокировкой, указанное расстояние, кроме того, должно быть не менее 1000 м.
Гость
Ответ(ы) на вопрос:
Гость
Var     a, b: real ; begin     Write('тормозной путь, определенного для данного места при полном служебном торможении = ');     readln(a);     Write('тормозной путь для на 120 км/ч для пассажирских поездов = ');     readln(b);     if b < a then a := b;     Write('тормозной путь для на 80 км/ч для грузовых поездов = ');     readln(b);     if b < a then a := b;     Write('тормозной путь при экстренном торможении с учетом пути, проходимого поездом за время, необходимое для воздействия устройств автоматической локомотивной сигнализации на тормозную систему поезда = ');     readln(b);       if b > a then a := b;     Write('участок, где видимость сигналов менее 400 м? да-1/нет-0 ');     readln(b);     if (b = 1) and (a < 1000) then a := 1000;     Write('железнодорожная линия, вновь оборудуемая автоблокировкой? да-1/нет-0 ');     readln(b);     if (b = 1) and (a < 1000) then a := 1000;     writeln(a); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы