Ответ:
1) 28
Т.к.а> b и b>c то идеи по первой ветке
2а+b+c=2*9+8+2=28
2)
Var Х,у:real;
Begin
Read(x);
If x<=5 then
Y:=x*x
Else y:=sqrt(25*x);
Write(y);
End.