
Вычислить в Паскаль, умоляю помогите
Ответы на вопрос
Ответил MrMiner1
0
program n_1;
var x, y: real;
begin
readln(x);
if (x=6) or (x=2) then writeln ('Нет корней')
else begin
y:=(x*x-7*x+10)/(x*x-8*x+12);
writeln(y:0:10);
end;
end.
var x, y: real;
begin
readln(x);
if (x=6) or (x=2) then writeln ('Нет корней')
else begin
y:=(x*x-7*x+10)/(x*x-8*x+12);
writeln(y:0:10);
end;
end.
Ответил lrakitskayap39re1
0
и еще один вопрос сейчас будет, если сможешь помоги, прошу!!
Новые вопросы
Другие предметы,
2 года назад
Русский язык,
2 года назад
Математика,
7 лет назад
Математика,
9 лет назад