Помогите написать программу ** языке Qbasic

0 голосов
60 просмотров

Помогите написать программу на языке Qbasic


image

Информатика (15 баллов) | 60 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

DIM n AS INTEGER, x AS DOUBLE, p AS DOUBLE, sx AS DOUBLE
CLS
INPUT "n,x=", n, x
sx = SIN(x)
p = 1
FOR i = 1 TO n
   p = p * (1 / n + sn / n ^ (n - 1))
NEXT i
PRINT p


image
image
БОГ (150k баллов)
10,984,878 вопросов
13,471,016 ответов
8,518,553 комментариев
4,909,216 пользователей