Переписать программу с Pascal на Python:
const
e = 0.001;
var
a, s: real;
i, n: integer;
begin
n:= 1;
a:= 1 / 3;
s:= 0;
repeat
s:= s + a;
inc (n);
a:= 1 / 3;
for i:= n downto 1 do a:= a * i / n
until abs (a) < e;
writeln ('S = ', s:0:6);
readln
end.

Question

Информатика: Переписать программу с Pascal на Python: const e = 0.001; var a, s: real; i, n: integer; begin n:= 1; a:= 1 / 3; s:= 0; repeat s:= s + a; inc (n); a:= 1 / 3; for i:= n downto 1 do a:= a * i / n until abs (a) e; writeln ( S = , s:0:6); readln end.

hellooiooooooo · Accepted Answer

// ConsoleApplication60.cpp: определяет точку входа для консольного приложения.// #include stdafx.h #include conio.h #include iostream #include stdio.h #include time.h using namespace std; int main(){ int x, y,c; setlocale(LC_ALL, RUS ); srand((unsigned)time(NULL)); x = rand() % 8 + 2; y = rand() % 8 + 2; cout Сколько будет   x * y ? 
 ; cout Введите ответ и нажмите Enter   ; cin c; if (x*y == c) { cout Правильно
 ;  } else { cout Вы ошиблись   x * y = c;  } return 0;}...

Переписать программу с Pascal на Python: const e = 0.001; var a, s: real; i, n: integer; begin n:= 1; a:= 1 / 3; s:= 0; repeat s:= s + a; inc (n); a:= 1 / 3; for i:= n downto 1 do a:= a * i / n until abs (a) < e; writeln ('S = ', s:0:6); readln end.

MOGZ ответил

Переписать программу с Pascal на Python:
const
e = 0.001;
var
a, s: real;
i, n: integer;
begin
n:= 1;
a:= 1 / 3;
s:= 0;
repeat
s:= s + a;
inc (n);
a:= 1 / 3;
for i:= n downto 1 do a:= a * i / n
until abs (a) < e;
writeln ('S = ', s:0:6);
readln
end.