Чем тут Ошибка?? помогите исправить (паскаль)

Question

program func1; 
Uses crt; 
begin 
clrscr; 
write ('a='); 
write ('b='); 
write ('h='); 
read(a,b,h); 
x:=a; 
while x <=b do 
begin 
y:=sin(sqr(x))+7 
writeLn(x=3:1; ;y=7:3); 
x:=x+h 
end 
End.

проверял на ABC пишет неизвестный идентификатор a b h

Алёна Селютина · Accepted Answer

writeLn(x:3:1, y:7:3); 
 
об этом тебе компилятор написал

Александр Наумов · Answer

writeLn(x=3:1; ;y=7:3); может из-за двух точек с запятой подряд? 
 
и после +7 вроде точка с запятой пропущена