Экономика
Пожалуйста, составьте алгоритм-блок схему определения расстояния между смежными светофорами.
На железнодорожных линиях, оборудованных автоблокировкой с трехзначной сигнализацией, расстояние между смежными светофорами должно быть не менее тормозного пути, определенного для данного места при полном служебном торможении на максимальной реализуемой скорости, но не более 120 км/ч для пассажирских поездов и 80 км/ч для грузовых поездов, и, кроме того, должно быть не менее тормозного пути при экстренном торможении с учетом пути, проходимого поездом за время, необходимое для воздействия устройств автоматической локомотивной сигнализации на тормозную систему поезда. При этом на участках, где видимость сигналов менее 400 м, а также на железнодорожных линиях, вновь оборудуемых автоблокировкой, указанное расстояние, кроме того, должно быть не менее 1000 м.
Условие задачи: Покупатель должен заплатить в кассу S рублей. У него имеются 10, 50, 100, 500, 1000 и 5000 рублей Сколько купюр разного достоинства отдаст покупатель, если он начинает платить с самых крупных купюр? Что не так в коде?:
var
s,i,q,f,t,z,y:integer;
begin
write('Введите сумму: ');
readln(s);
while s>5000 do
s:=s-5000;
i:=i+1;
writeln('Купюр "5000" всего: ',i);
while s>1000 do
s:=s-1000;
q:=q+1;
writeln('Купюр "1000" всего: ',q);
while s>500 do
s:=s-500;
f:=f+1;
writeln('Купюр "500" всего: ',f);
while s>100 do
s:=s-100;
t:=t+1;
writeln('Купюр "100" всего: ',t);
while s>50 do
s:=s-50;
z:=z+1;
writeln('Купюр "50" всего: ',z);
while s>10 do
s:=s-10;
y:=y+1;
writeln('Купюр "10" всего: ',y);
end.