Question

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

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.