1 2 3 4 5 6 7 8 9 10 11 12 | INPUT "vvedite n ", n t = 32 y = 1 r = - 1 s = 6 FOR x = 1 TO n r = -r t = t / 2 s = s + 2 y = y * ( 2 / t + r * s) NEXT PRINT "y="; y |
Тестирование выполнено в программе QB64 ( Скачать )
1 2 3 4 5 6 7 8 9 10 11 12 | INPUT "vvedite n ", n t = 32 y = 1 r = - 1 s = 6 FOR x = 1 TO n r = -r t = t / 2 s = s + 2 y = y * ( 2 / t + r * s) NEXT PRINT "y="; y |
Тестирование выполнено в программе QB64 ( Скачать )