Y=a^2=5x-8/4x-8=(6x/2) паскаль

Question

Y=a^2=5x-8/4x-8=(6x/2) паскаль

Comments

Что с этим требуется сделать?

---

решить в паскале

---

То есть проверить истинность данного выражения?

---

надо чтоб паскаль просчитал это выражение

---

Тут несколько выражений и они приравнены. Каждое по очереди?

---

y:=a*a+5*x-8/(4*x)-8+(6*x/2);

---

ттам вот так

Answer 1

Var a,x,y:real;
begin
write('a=');readln(a);
write('X=');readln(X);
y:=a*a+5*x-8/(4*x)-8+(6*x/2);
writeln('y=',y:5:2);
end.

Comments

Попробуйте ввести 0 при присваивании x.

---

ОК. Считается, что условный оператор ещё не проходили и данные должны вводиться правильно. )))

Answer 2

Var y,a,x:real;
begin;
readln(x);
readln(a);
if x=0 then exit;
y:=sqr(a)+5*x-8/(4*x)-8+(6*x/2);
writeln(y);
end.