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

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

Question

Информатика

Глафира

7 августа, 09:12

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

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

+4

Ответы (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) ;