Строка №6 - числу нельзя присвоить какое нибудь значение.
Строки №8 и №10 - целочисленным нельзя присвоить дробное значение.
Строка №7 - между 7 и 8 должна стоять точка, а не запятая.
Вот изменённая программа:
program qq;
var a, b, x, y: real;
begin
a := 5;
x := 10;
y := 7.8;
b := 2.5;
x := 2*(a + y);
a := b + x;
end.