Question

ПОМОГИТЕ ПОЖАЛУЙСТА написать задачу так что бы она работала в паскале!!!

Answer 1

var

 a, b, c, s, y, k : double;

 begin

   readln(a,b,c);

   s := c + sqrt(a+power(b, 4)) / c;

   k := sqrt(abs(a*b*c)+s);

   y := k + 5 * s * (a / (b*c));

   write(y:5:4);

 end.