Кто что может,помогите

Question

Кто что может,помогите

---

Answer 1

1)program z1;
var  y, x: real;
begin
 writeln('Введите x');
readln(x);
 y := (1 /(3.5-x));
writeln('Значение функции=',y);
end.

Comments

2)Я уже писал

---

3)Не знаю, не проходили