в чем ошибка кода

[Zer0]

const
y='Ino';
x='Rob';
var
Sol,Rob,f,g,a,b:string;
c,d:integer;


begin
c:=0;
d:=0;
writeln('vvedite 1th player');
readln(f);
writeln('vvedite 2th player');
readln(g);


If (y=f) and (x=g) then
begin
c:=c-1;
d:=d-1;
end;
writeln(c,' ',d);


readln;
end.