Паскаль Составить программу, которая выводит меню и при нажатии вводе цифры вычисляет соответствующее выражение: 1 - y= (a+b)^2 2 - y= a^2-b^2 3 - y= 1/(a+b)

var i,y,a,b: single; begin writeln('Выберите действие: 1)y=(a+b)^2; 2)y=a^2-b^2; 3)y=1/(a+b)'); read(i); if i=1 then begin writeln('Введите a и b'); read(a,b); write('y=',(a+b)*(a+b)); end else begin if i=2 then begin writeln('Введите a и b'); read(a,b); write('y=',(a*a)-(b*b)); end else begin if i=3 then begin writeln('Введите a и b'); read(a,b); write('y=',1/(a+b)); end; end; end; end.