Паскаль,очень срочно

Question

Паскаль,очень срочно

---

Comments

Контрольные, самостоятельные, тесты и иные классные работы давать запрещено

---

почему

---

Blednyi сделай пожалуйста

---

Почему запрещено? Правила читать надо внимательнее, с которыми соглашаетесь при регистрации!

---

хорошо

Answer 1

Var x,y:real;
begin
read (x);
if x>10 then y:=sqrt(x - 5)/2;
if x<10 then y:=(x - 5)/2; <br>write(y)
end.