Question

Складіть проекти для обчислення виразів.

1, 2c+2b:(2c-f)
Лазарус​

Answer 1

program qq;

var c, b, f: integer;

s: real;

begin

readln(c, b, f) ;

s:=2c+2b/(2c-f) ;

writeln('s=', s) ;

readln;

end.