Подскажите, пожалуйста, в чем ошибка программы? Паскаль ничего не пишет, но правильный ответ не выдает.
program p1;
var a,b:= integer;
var f,g: File of integer;
begin
assign (f,'C:\In.txt');
reset (f);
read (f,a);
close (f);
b:= a+10;
assign (g,'C:\Out.txt');
rewrite (g);
write (g,b);
close (g);
end.

замените первую строку на следующуюvar a,b: integer;вторую строку замените на следующуюf,g:text;чем вы записывали число в файл in.txt ?по Вашей программе там должно быть число,а Вы наверное записали в файл символьное представление числадля символьного представления тип файла text