Составить программу вычисления и выдачи на печать суммы (или произведения) N элементов бесконечного числового ряда. Программа должна выводить первые 4-5 элементов числового ряда и конечный результат Y = (7 + 3^5/1) (8 — 3^4/2) (9 + 3^3/3) (10 — 3^2/4)… — QBasic(Бейсик)

disel
1
2
3
4
5
6
7
8
INPUT "vvedite kolichestvo elementov ", n
y = 1
FOR i = 1 TO n
    t = (6 + i + 3 ^ (6 - i) / i)
    IF i < 5 THEN PRINT t
    y = y * t
NEXT
PRINT "y="; y

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment