Пожалуйста, помогите составить программу вычисления функции y. y= x^{2} +3, если x>0...

Question

Пожалуйста, помогите составить программу вычисления функции y.
y= x^{2} +3, если x>0
x^{2} -3, если x меньше или равно 3

Comments

Если можно, то запишите сразу в виде Паскаль

---

x вводим с клавиатуры

Answer 1

Возможно маленько не понел задания

uses crt;
var x:integer;
begin
write(Введите x = '); read(x);
if x>0 then begin
if x<-3 then writeln('2) x^2-3 = ',sqr(x)-3); <br>end else writeln('1) x^2+3 = ',sqr(x)+3);
end.