Ответы
Ответ дал:
0
program one;
var
x,y:real;
begin
write('Vvedite X=>');Readln(x);
if x>2 then y:=1/(x*x+4*x+5) else y:=x*x+4*x+5;
Writeln ('Y=',Y);
end.
var
x,y:real;
begin
write('Vvedite X=>');Readln(x);
if x>2 then y:=1/(x*x+4*x+5) else y:=x*x+4*x+5;
Writeln ('Y=',Y);
end.
Ответ дал:
0
спасибо большое) Паскаль?
Ответ дал:
0
да. а на каком надо?
Ответ дал:
0
на Паскале пойдет) огромное спасибо
Похожие вопросы
2 года назад
2 года назад
8 лет назад
8 лет назад