Помогите решить задание на 4. И как записать в Paskal*e
Помогите решить задание на 4. И как записать в Paskal*e
Гость
Ответ(ы) на вопрос:
Гость//На будущее, не 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.
Не нашли ответ?
Похожие вопросы