Допишите программу определения значения функции. Помогите,пожалуйста!Срочно...

Question

Допишите программу определения значения функции.
Помогите,пожалуйста!Срочно нужно!Извините за галимое качество.

f(х) = 0,при х меньше или равно 2 и х больше или равно 5,

2*х,при 2 < x< 5

с использованием оператора case.


SOS!Спасите меня кто-нибудь.

---

Answer 1

program task;

var 
x, f: real; 
t: boolean;

begin 
readln(x); 
t := (x > 2) and (x < 5); 
case t of    
true: f := 2 * x;   
false: f := 0; 
end; 
write(f);
end.

Comments

обнови

---

чтобы все стало видно

---

Спасибо большое!)