• Написать программу в Паскале через циклы while и repeat.
    Вычислить сумму бесконечного ряда с заданной точностью E=0.5e-6,к=0.

Ответы 1

  • Сумма этого бесконечного ряда дает значение  е - основание натурального логарифма,   е = 2,718281828459045....const eps=0.5e-6;var k: integer;    ex,s,fak: real;begin   ex:=exp(1);   k:=0;   s:=1;   fak:=1;   repeat     k:=k+1;     fak:=fak/k;     s:=s+fak;   until ex-s<eps;     writeln('сумма = ',s);   writeln('точное значение:  ',ex);end.    с циклом  while - после  fak:=1;   while ex-s>eps dobegin     здесь те же операторы, что и в repeatend;
    • Автор:

      ferris
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years