Регистрация
Войти
Стать экспертом Правила
Информатика

Написать программу вычисления значений функции в заданныхточках (Turbo Pascal) Очень нужно

ОТВЕТЫ
Лови)
var
  x: real;

begin
  x := 1;
  while x <= 5 do
  begin
    writeln('y(', x:1:1, ') = ', ln(x) - exp(-1 * x));
    x := x + 0.1;
  end;
end.
596
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам