
Кто что может,помогите

1)program z1;
var y, x: real;
begin
writeln(Введите x);
readln(x);
y := (1 /(3.5-x));
writeln(Значение функции=,y);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
1)program z1;
var y, x: real;
begin
writeln(Введите x);
readln(x);
y := (1 /(3.5-x));
writeln(Значение функции=,y);
end.