Как сообщить...?(Pascal)

Условие: Дано натуральное число N.Поменять порядок следования цифр в этом числе на обратный или сообщить, что это невозможно в силу переполнения.Новое число должно быть сформировано ( храниться в переменной) и выведено на экран.

У меня получилось только поменять порядок цифр на обратный, как сделать дальше?Помогите, пожалуйста.

uses CRT;
var N, nn:integer;
BEGIN
    ClrScr;
    Write('N:= '); ReadLn(N);
    nn:= 0;
    while N>0 do begin
        nn:= nn*10+(N mod 10);
        N:= N div 10;
    end;
    WriteLn('N''= ',nn);
    Write('< Ok >');