Решите задачу на паскаль
Прошу помогите мне!!
Приложения:
![](https://st.uroker.com/files/d9d/d9daef7ff44e86570377bc216854a2c3.jpg)
няяяяяяяяяяяяяяша:
Тебе надо с вводом значения?
Ответы
Ответ дал:
1
Ответ:
Program maks;
Var a,b,c,d: real;
begin
Writeln ('Введите x:');
Readln (a);
b:=a*2;
c:=a*a-16;
d:=b/c;
Writeln ('y=',d);
end.
Ответ дал:
1
var x,y: real;
begin
readln(x);
y:=(2*x)/(x*x-16);
write('y=',y);
end.
Вас заинтересует
4 месяца назад
4 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
7 лет назад