Надо написать программу в free pascal. по данному значению x вычислите функции y,учитывая область определения функции. y=(16*x^2 / x-2)+3 /-это дробь

Jek15 Jek15    1   21.05.2019 01:10    0

Ответы
LizaPetukhova LizaPetukhova  01.10.2020 01:43

var
x:integer;
y:real;
begin
writeln('Vvedite x');
readln(x);
if (x>0) and (x<>2) or (x<0) then
begin
y:=(16*sqr(x))/(x-2)+3;
writeln('y = ',y:2:2);
end
else
writeln('X ne vxodit v oblast opredeleniya');
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика