Ребята, очень нужна понятная и доступная помощь в Pascal, посмотрите ** баллы. Написать...

Question

Ребята, очень нужна понятная и доступная помощь в Pascal, посмотрите на баллы.
Написать программу: вычислить значение переменной у по одной из двух ветвлений. (данные прикреплены). Надеюсь на вашу помощь, желательно на листке написать и тоже прикрепить, но можно и без.

---

Comments

а какое значение у переменной "у"

---

эта переменная равна данной прикрепленной системе

Answer 1

Var
y,x,z:real;
Begin
write('Введите x: ');
readln(x);
write('Введите у: ');
readln(y);
if x>0 then 
z:=sqr(y)
else 
z:=y+2;
Writeln('z=',z);
readln;
end.

Answer 2

Program ClarisVerbis;

var
  x,y:real;

begin
  Write('x='); Read(x);
  if x>0 then y:=x*x
  else y:=x+2;
  Writeln('y=',y)
end.

Comments

Я думаю, условие написано неверно. надо найти y, поэтому там должно быть x везде.

---

угу

---

что именно неверно? в чем загвоздка? учитель трактовал задание именно так, у = данной системе.

---

Во-первых, это никакая не система. Это определение кусочной функции. Во-вторых Вы как собираетесь y определять через y ? Там вместо y должно стоять х.