Вопрос в программе значение integer выходит за предел диапазона его значений, но программа не помечает это

[сабрина]

var
a:integer;
x,y:real;
begin
a:=34768;
x:=a*2;
writeln(x);
end.