Вычислить значение выражения 1 / (x-15) для любого x.

Сделать в Pascal.

Question

Назарий

13 июля, 18:27

+1

Ответы (1)

Знаете ответ на вопрос?

Матрона · Answer 1

Program z1;

var x:integer;

y:real;

begin

Writeln ('Введите x') ;

readln (x) ;

y:=1 / (x-15) ;

writeln (x:5:2) ;

readln;

end.

Вычислить значение выражения 1 / (x-15) для любого x.Сделать в Pascal.