Паскаль. Только начал учить. Где-то ошибка

var a, b : longint;
fi, fo: text;

begin
assign(fi, 'input.txt'); reset(fi);
assign(fo, 'output.txt'); rewrite(fo);
read(a,b);
a:= a-1 //здесь компилятор выдает ошибку
b:= b-1
write(b,a);
end.

Блин забыл ; поставить)

А еще поможите? Почему не выводится значение в выходной вайл? ВОт новый код
var a, b : longint;
fi, fo: text;

begin
assign(fi, 'input.txt'); reset(fi);
assign(fo, 'output.txt'); rewrite(fo);
read(a,b);
a:= a-1;
b:= b-1;
write(b,a);
close(fi);
close(fo);
end.