Написать программу, которая посчитает значение примера √(100+√(98+√(96++√( в паскале

Program sqrt;
var a,b:integer;
begin
write('Введите N : ');
read(a);
b:=sqrt(100+sqrt(98+sqrt(96+a+sqrt(2;
writeln('Результат -',b);
end.