У меня задача не проходит 31 тест пишет неправильный ответ ввёл тест себе на компьютере выдаёт правильный ответ. В чём ошибка?

Код:

uses math;
var
p1,p2,p3,p4,l,k,a,b:longint;
begin
read(p1,p2,p3,p4,a,b);
k:=min(p1,min(p2,min(p3,p4)));
l:=k-a;
if l>0 then write(l)
else write(0);
end.

Тест:

541 931 822 948 131 193

У меня выдаёт 410, а на сайте 63