програмирование 2 вариант​
k=1

osazienko osazienko    3   25.11.2019 06:41    0

Ответы
vfedkina35 vfedkina35  17.08.2020 13:47

program abc2;

var x,y:real;

begin

x:=0.1;

repeat

if (sqr(x)-1.8*x+1.2)=0 then

writeln('x=',x,'нельзя вычислить функцию')

else

y:=(364*sqr(x)*exp(-7.5*x))/(sqr(x)-1.8*x+1.2);

if y>1 then

writeln('y=',y:8:3);

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