Помогите разобраться с уравнением в Паскале!

дано уравнение log_a (bx+c) = 2

Укажите на мои ошибки пожалуйста:

program lab3_1;
uses crt;
var b,a,c:integer;
x,xx,xxx:real;
begin
clrscr;
write('Vvedite a=');
readln(a);
write('Vvedite b=');
readln(b);
write('Vvedite c=');
readln(c);
xx:=-c/b;
xxx:=b*xx+c;
if xxx