Задание 1. Создайте программу для вычисления значений выражений. Исходные данные a,b,c задаются пользователем с клавиатуры.
X=2a^2-b/3c
Y=sqrt(x+c^2)+4ab
Какие исходные данные будут недопустимыми? Проверьте, что произойдет при запуске программы с такими данными. Добавьте в программу проверку исходных данных после их ввода.

var  a,b,c,x,y:real;begin  Write('Введите a и b: '); Read(a,b);  repeat    Write('Введите c, не равное нулю: ');    Read(c)  until c<>0;  x:=2*sqr(a)-b/(3*c);  {  Если Вы относитесь к людям, ненавидящим скобки  и тех, кто решает Ваши задания, то в Вашем условии  на 3а делится все выражение, и тогда предыдущая строка  должна иметь вид x:=(2*sqr(a)-b)/(3*a);  }  if x>=0 then  begin y:=sqrt(x+sqr(c))+4*a*b; Writeln('x=',x,', y=',y) end  else    Writeln('x=',x,', y вычислить нельзя, под корнем отрицательное значение')end.Тестовое решение:Введите a и b: 3.4 -2.18Введите c, не равное нулю: 0Введите c, не равное нулю: 5.172x=23.2605001288992, y=-22.5762191684909