количество чисел между заданными

[uzer2007]

Помогите плиз, не могу понять, почему задача не проходит на всех тестах (один не верно). Условие:заданы два целых числа. требуется узнать сколько целых чисел одновременно удовлетворяют неравенствам x>a и x<b. Входные данные: в одной строке задаются два целых числа а и в, по абсолютному значению не превышающие 30000.
Мое решение:
var a,b,x:integer;
begin
read(a,b);
if (abs(a) <=30000)and (abs(b)<=30000) then
if b>a then x:=b-a-1 else x:=0;
write(x);
end.

[BDA]

var
  a, b: longint;
begin
  read(a, b);
  if b > a then write(b - a - 1) else write(0);
end.

[Serge_Bliznykov]

кстати, в коде TC я особого криминал не увидел.
разве что, я бы x иницилизировал нулём в начале, ну и тип данных сделал Longint, неизвестно, что там за разрядность Паскаля.

к решению BDA никаких замечаний нет!

[uzer2007]

BDA СПАСИБО! проверил. сработало 100%.почему нужен Longint, чем не подходит integer? Serge_Bliznykov что такое разрядность, как она в данном случае влияет. Еще раз спасибо, за оперативность отдельно!!!!!!!!!

[Poma][a]

разве что, я бы x иницилизировал нулём в начале

А он там будет.. Глобальные переменные автоматом получают 0-лик.. А x в данном случае - глобальный..

[BDA]

Допустим, a = -30000, b = 30000. Они удовлетворяют условию, но их разность не поместится в Integer. Вот тут-то и вступает в дело разрядность (Разрядность (битность) в информатике — количество разрядов (битов) электронного (в частности, периферийного) устройства или шины, одновременно обрабатываемых этим устройством или передаваемых этой шиной.). В данном случае разрядность, это количество бит, доступное для хранения в данной переменной. LongInt обладает большей разрядностью и поэтому пригоден для обработки всех возможных входных данных.

[uzer2007]

спасибо. понятно!

[Аватар]

Для двухбайтного integer и b=30000 a=-30000 (или похожего) код ТС теста наверно и не прошел

PS извиняюсь за дубль, но за BDA не угонишься