var
  a, h, f, x, d, b, z, l, t, y: real;
begin
  (a, h, f, x) := ReadReal4;
  var temp := (Sqrt(Abs(a - h) + 4*a*f)) / (Sqrt(x + 8));
  Writeln('значение равно: ', temp);
  
  (a, d) := ReadReal2;
  temp := Sqrt(a + Sqrt(d + Sqrt(87)));
  Writeln('значение равно: ', temp);
    
  (x, y, l, t) := ReadReal4;
  temp := Power((2 + Power(y, x)) / (Abs(1 - l) + t), 1.0/3.0);
  Writeln('значение равно: ', temp);
  
  (b, d, f) := ReadReal3;
  temp := (17/245 - Cos(Abs(b*d))) * (53/67 - Sin(f));
  Writeln('значение равно: ', temp);
  
  z := ReadReal;
  temp := Power(z, -37.0);
  Writeln('значение равно: ', temp);
  
  temp := (-83 div 4 + 37 mod 5);
  Writeln('значение равно: ', temp);
end.