Joswyn
6 год назад
Написать функцию y = x^2/(x-1) в Pascal.
ОТВЕТЫ
Viannavli
Jul 9, 2019
Program f;
var
x, y: real;
begin
write(x=);
readln(x);
y := (x * x) / (x - 1);
writeln(y=, y);
end.
var
x, y: real;
begin
write(x=);
readln(x);
y := (x * x) / (x - 1);
writeln(y=, y);
end.
197
Смежные вопросы:
