Question

помогите пожалуйста срочно!!!!!

Answer 1

var x: real;
begin
     readln(x);
     writeln(2 * x * sqrt(x + sqrt(x)));
end.

2)
var a, b, c: real;
begin
     readln(a, b, c);
     writeln('>', (a + b + c) / 3);
end.
Среднее арифметическое)