Пример 4. Нахождение суммы
Составить программу для вычисления значения суммы 1. Запустите QBasic. 2. В окне редактирования наберите текст программы: REM Нахождение суммы CLS INPUT "'Введите значение n "; n s = 0 FOR i = 1 TO n STEP 1 s = s+(i ^ 3 -1); NEXT i PRINT "Сумма равна "; s 3. Сохраните программу на диске. 4. Самостоятельно составьте программу нахождения суммы для произвольного значения n. (Проверка: для n = 15 сумма должна быть равна 3.318229).
|