Question

информатика 9 класс Паскаль​

Answer 1

Ответ:

var

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

begin

 Write('Введите a = '); ReadLn(a);

 Write('Введите b = '); ReadLn(b);

 Write('Введите c = '); ReadLn(c);

 s := sqrt(2 * a + sqr(b)*b) / (3 * sqr(sqr(c)));

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

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

 WriteLn('y = ', y:2:7);

end.

Объяснение: