Подскажите, пожалуйста, в чем ошибка программы? Паскаль ничего не пишет, но правильный ответ не выдает. 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;
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.