QBasic. Помогите, пожалуйста! Дано вещественное число A и целое число N больше 0. Вывести значение ряда 1 – A + A^2 – A^3 + ... + (–1)^nA^n.
QBasic. Помогите, пожалуйста! Дано вещественное число A и целое число N>0. Вывести значение ряда 1 – A + A^2 – A^3 + ... + (–1)^nA^n.
Гость
Ответ(ы) на вопрос:
ГостьDIM A#, N%, S#
CLS
INPUT "A = ", A
INPUT "N = ", N
FOR i = 0 TO N
S = S + (-1) ^ i * (A ^ i)
NEXT i
PRINT "S = ", S
END
Не нашли ответ?
Похожие вопросы