Дорога в школу В Байттауне, как и во многих других городах есть метро. Оно представляет...

Question

Дорога в школу
В Байттауне, как и во многих других городах есть метро. Оно представляет собой N станций, расположенных по кругу. Станции пронумерованы от 1 до N по часовой стрелке, станция номер 1 находится между станциями с номерами N и 2.
В этом замечательном городе есть одна школа, в которой учатся все городские дети. Эта школа находится на станции номер 1. Каждое утро городские дети заходят в метро, выбирают в какую сторону им ехать, садятся в поезд и едут в школу. Многие дети хотели бы знать, в какую сторону им ехать, чтобы проехать минимальное количество станций, прежде чем они попадут в школу. Так например, если в городе 5 станций, то школьнику Ивану, живущему на станции номер 4, достаточно проехать 2 остановки, и вот он уже в школе, а Марии, живущей на 2 станции, достаточно проехать одну остановку.
Ваша задача – по номеру станции, на которой живёт школьник, вывести количество остановок, которое ему придёт проехать по пути в школу

Comments

какой язык?

---

Не знаю, я не разбераюсь, мне на фри паскале нужно сделать

---

var c,b,e,n,a:integer; beginwrite('введите количество остановок => ');readln(a);a:=a+1;write('на какой остановке живёт ребёнок => ');readln(b);c:=0; n:=0;for c:=1 to b do begin;e:=e+1;end;for c:=a downto b do beginn:=n+1;end;if (e ',e-1) else writeln('кол-во остановок => ',n-1); end.

---

вот так это выглядит

---

Спасибо огромное

Answer 1

Var c,b,e,n,a:integer; 
begin
write('введите количество остановок => ');
readln(a);
a:=a+1;
write('на какой остановке живёт ребёнок => ');
readln(b);
c:=0; n:=0;
for c:=1 to b do begin;
e:=e+1;
end;
for c:=a downto b do begin
n:=n+1;
end;
if (e ',e-1) else writeln('кол-во остановок => ',n-1); 

end.

Answer 2

Var
n,s:integer;{объявляем переменные}
begin
  readln(n,s);
  if (n div 2) >= s then writeln(s-1)
  else writeln(n-s+1);
end.
Конечно костыль, но ничего лучше я не придумал

Comments

ахаха, великая инкастыляция?

---

пасиб ща переделаю

---

)))

---

зато 7 строчек

---

и все так

---

по входным данным проверял

---

я ещё свои примеры придумал

---

но ваш костыль работает

---

даже с моими примерами

---

мое детище