Ответы
Ответ дал:
0
//На будущее, не Paskal, а Pascal
var z,x:real;
begin;
readln(x);
if (sqr(x)-8*x+12)=0 then exit;
z:=(sqr(x)-7*x+10)/(sqr(x)-8*x+12);
writeln(z);
end.
var z,x:real;
begin;
readln(x);
if (sqr(x)-8*x+12)=0 then exit;
z:=(sqr(x)-7*x+10)/(sqr(x)-8*x+12);
writeln(z);
end.
Ответ дал:
0
Спс,прост информатичка устроит контрольную работу. А темы нет в учебнике и толком не объяснила...
Вас заинтересует
6 лет назад
9 лет назад
9 лет назад
9 лет назад