В торговом центре этажи нумеруются так: …, –3, –2, –1, 1, 2, 3, … (то есть нет...

Question

В торговом центре этажи нумеруются так: …, –3, –2, –1, 1, 2, 3, … (то есть нет нулевогоэтажа). Вася спустился на лифте с этажа с номером A на B этажей, а затем поднялся на лифтена C этажей. Определите, на каком этаже он оказался.Программа получает на вход три целых числа: в первой строке записано число A, вовторой — B, в третьей — С. Число A не равно нулю и не превосходит по модулю 100, числа Bи С — положительные и не превосходят 100. Программа должна вывести одно целое число — номер этажа, на котором оказался Вася

Answer 1

Var a,b,c:integer;
Begin
  read(a,b,c);
  if (a < 0) or (abs(a) > abs(b)) then a:= a - b
  else a:=a-b-1;
  writeln(a);
 
  if (a > 0) or (abs(a) > abs(c)) then a:= a + c
  else a:=a+c+1;
  writeln(a);
End.

Comments

если помогло то выбери решение лучшим плиз

---

Через час скажу

Answer 2

Var a,b,c:integer;
Begin
read(a,b,c);
if (a*(a-b) > 0) then a:= a - b
else a:=a-b-1;
writeln(a);

if (a*(a+c) > 0) then a:= a + c
else a:=a+c+1;
writeln(a);
End.