прикладная математика

Программа позволяет получить приближенное значение числа e=2,7182818284590.... Демонстрируется работа с рядами и суммированием. Программа на языке Паскаль. Имеет скорее учебное значение чем практическое.

program predel_chislo_eilera; uses crt; const x:boolean=true; var e,a:extended; i,n: longint; Begin repeat clrscr; n:=1000000; e:=1; a:=1+1/n; i:=0; repeat e:=e*a; inc(i); until i=n; writeln ('n=', n:8, ' e=',e:15:13); writeln('Для выхода нажмите на Esc'); until readkey=#27 End.

---