Решите пожалуйста,подробно и скинте в ответы фото.

Question

Решите пожалуйста,подробно и скинте в ответы фото.

---

Comments

pascal?

---

var x : integer; y : real;begin read(x); y:=(2*x-5)/(x-8); writeln(y:4:2);end.

Answer 1

Var x : integer;
y : real;

begin 
read(x);
y:=(2*x-5)/(x-8);
writeln(y:4:2);
end


var x , y, h : integer; s : real;
begin readln(x,y);s:=((x/7)+(y/7))*90;h:=Trunc(s);writeln(h);end.