
Moril
6 год назад
Вычислить значение выражения 1/(x-15) для любого x.Сделать в Pascal.
ОТВЕТЫ

Весела
Oct 24, 2020
Program z1;
var x:integer;
y:real;
begin
Writeln('Введите x');
readln(x);
y:=1/(x-15);
writeln(x:5:2);
readln;
end.
var x:integer;
y:real;
begin
Writeln('Введите x');
readln(x);
y:=1/(x-15);
writeln(x:5:2);
readln;
end.
116
Смежные вопросы: