Написать программу ** языке pascal то что изображено ** картинке

Question

Написать программу на языке pascal то что изображено на картинке

---

Answer 1

Var
x, y:real;
begin
read(x);
if x = 0 then
y := exp(x) + 0.7 
else
y := 4.2 - x * 2;
writeln(y);
end.

Comments

в паскале е не определена

---

да

---

запустишь программу, выведет ошибку

---

и сотри мой комментарий тогда

---

про плохо видно

---

ща исправлю

---

6 строчка ошибку выдает

---

исправила.

---

теперь работает?

---

да