Для тех кто разбирается в Турбо Паскале, я решил задачу, в программе работает, а на сайт решение высылаю пишет неверно!

Question

Условие 
 
end.<img src="//content.foto.my.mail.ru/mail/timyp_kpyt/_answers/i-77.jpg" > 
 
Решение: 
program macintosh; 
var a:integer; 
begin 
assign(input,'input.txt');reset(input); 
assign(output,'output.txt');rewrite(output); 
read (a); 
writeln ('The next number for', a ,'is', a+1); 
writeln ('The previous number for', a ,'is', a-1); 
 
ЧТО НЕВЕРНО?!

В ПАСКАЛЕ ВСЕ РАБОТАЕТ А НА САЙТЕ ПИШЕТ НЕПРАВИЛЬНО Я ЗАКОЛЕБАЛСЯ

Андрей Зайцев · Accepted Answer

Во первых, тут не вся программа, где end на конце? 
Во вторых, не факт что такая запись без объявления input,output переменных прокатит на сервере 
 
var a:integer; 
var inp,out:text; 
begin 
assign(inp,'input.txt');reset(inp); 
assign(out,'output.txt');rewrite(out); 
read (inp,a); 
writeln (out,'The next number for ', a ,' is ', a+1); 
writeln (out,'The previous number for ', a , ' is ', a-1); 
end. 
 
P.S. Ошибка в другом: Ты пример вывода видел? ? Там пробелы нужны, перед и после чисел, а у тебя всё сплошняком))) )