Составьте программу, хотя бы первую, плиииз

Question

Составьте программу, хотя бы первую, плиииз

---

Answer 1

Var x,y:integer;
begin

Comments

ток этого мало, это как я знаю, начало

---

сори, телефон залагал, ща отправлю

---

заранее спасибо

---

var x:integer; y:real; begin writeln('введите x'); readln(x); y:=2.64+(sin(sqr(x))+sqr(cos(x)))/sqrt(abs(x-2)); writeln('y= ',y); end. вроде так

---

пасиб)))