Вычислить значение функции y=1/x-5 на отрезке от 1 до 10

КираМурТоп КираМурТоп    1   02.03.2019 15:00    0

Ответы
gelyacot gelyacot  23.05.2020 22:06

В задаче не указан  шаг изменения x , допустим он равен 1

var

x,y:real;

begin

x:=1;

while x<=10 do

begin

y:=1/x-5;

writeln(y:8:2);

x:=x+1;

end;

end.

 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика