Написать программу паскаль: y=x^2+b^2 заранее ))

var x,b,y:integer;
begin
write('x = ');
readln(x);
write('b = ');
readln(b);
y:=x*x+b*b;
writeln('y = ',y);
end.

Пример:
x = 5
b = 8
y = 89