На языке паскаль написать программу вычисления значений функции. y=( 3+x )/( 3-x );
На языке паскаль написать программу вычисления значений функции.
y=( 3+x )/( 3-x );
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы