Составьте программу вычисления значения функции y=(5x2-4)/(2x+8)

Question

Составьте программу вычисления значения функции y=(5x2-4)/(2x+8)

Answer 1

//PascalABC.Net
//NaaMan
var
    x, y : real;
begin
    write('Введите значение Х: ');
    readln(x);
    if (2 * x + 8 = 0) then begin
        writeln('Для этого значения Х решения нет.');
        writeln('Конец программы');
        end
    else begin
        y := (5 * x * x - 4) / (2 * x + 8);
        writeln('Результат вычислений: ',y)
        end
end.

---

Answer 2

Program test
Var x:integer;
y:integer;
Begin
Writeln("Введите x:");
Readln(x);
y=(5x^2-4)/(2x+8);
Writeln("Y=",y);
End.

Comments

program test (пропущена точка с запятой)

---

var x: integer; (число может быть вещественным)

---

writeln(" ---Вместо кавычек используется апостроф '

---

Понятно

---

В формуле пропущены знаки умножения. Знака возведения в степерь ^ в паскале нет.

---

2х + 8 может быть получена ошибка от деления на 0.

---

Тренируйся! У тебя все впереди!

---

Спасибо)

---

В формуле x- переменная или знак умножения?

---

переменная. она возводится в квадрат.