На языке паскаль написать программу вычисления значений функции.

y = (3+x) / (3-x) ;

Question

Информатика

Доса

22 марта, 00:55

На языке паскаль написать программу вычисления значений функции.

y = (3+x) / (3-x) ;

+3

Ответы (1)

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

Дормидбнт · Answer 1

Var

x: integer;

y: real;

begin

write ('x = ') ;

readln (x) ;

if x = 3 then writeln ('Ошибка: деление на ноль!')

else

begin

y: = (3+x) / (3-x) ;

writeln ('y = (3+x) / (3-x) = ', y:3:2) ;

end;

readln;

end.

На языке паскаль написать программу вычисления значений функции.y = (3+x) / (3-x) ;

На языке паскаль написать программу вычисления значений функции.

y = (3+x) / (3-x) ;