Перевод программы с++ на паскаль! #include #include const float e = 0.0001; int main() { float x; std:

Question

Информатика: Перевод программы с++ на паскаль! #include #include const float e = 0.0001; int main() { float x; std: : cin x; float a = (x - 1 ) / x; float s = a; int n = 2; do { a *= (x - 1 ) / x * (n - 1) / n; s += a ; n++ ; } while ( a e / n ); std: : cout log( x ) s std: : endl; system( pause ); return 0; }