Помогите с инфой

Инициализируешь переменные y, a, c вещественного типаПрисваиваешь к y выражение:y=sqrt(a*a+sqrt(c)) ;Выводишь yПрограмма изи

var a, c, y : real; begin write('Enter a:'); read(a); write('Enter b:'); read(b); y := sqrt(a*a + sqrt(c)); writeln('y = ', y); end.