Написать программу в Pascal

1) найти значение выражения y=1/x

2) Вычислить значение выражения y = корень из x делённое на x+1

Question

Информатика

Лонгин

18 мая, 19:14

Написать программу в Pascal

1) найти значение выражения y=1/x

2) Вычислить значение выражения y = корень из x делённое на x+1

+5

Ответы (1)

Знаете ответ?

Юлюся · Answer 1

1) var y, x:real;

begin;

readln (x) ;

if x=0 then exit;

y:=1/x;

writeln (y) ;

end.

2) var y, x:real;

begin;

readln (x) ;

if x<0 then exit;

y:=sqrt (x) / (x+1) ;

writeln (y) ;

end.

Написать программу в Pascal1) найти значение выражения y=1/x2) Вычислить значение выражения y = корень из x делённое на x+1

Написать программу в Pascal

1) найти значение выражения y=1/x

2) Вычислить значение выражения y = корень из x делённое на x+1