VPF::Написать подпрограмму для вычисления для n=1.46 з

sasha1212

Дата 16.10.2015, 21:20 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 27
Регистрация: 11.3.2014

Репутация: нет
Всего: нет

Написать подпрограмму на VBA для вычисления для n=1...46 значения выражения ∑_(k=1)^n▒k^3 ,записать на лист текст.документа MS Word.Есть код,но он не работает. Помогите ,где здесь ошибка?Только недавно начал изучать язык

Код


Sub Summa()

For k = 1 To 46 Step 1
sum = sum + k ^ 3
Documents(1).Paragraphs.Add Documents(1).Paragraphs(n + 1).Range
Documents(1).Paragraphs(n + 1).Range.Text = str(k) & ": " & sum + chr(13) + chr(10)
Next k
End Sub

Это сообщение отредактировал(а) sasha1212 - 16.10.2015, 21:23

Angel666

Дата 18.10.2015, 23:23 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 0
Регистрация: 8.9.2011

Репутация: нет
Всего: 1

Подскажу ты начал цикл
For s = 1 To 46 Step 1
и закончить ты должен так
Next s
у тебя переменная числовая s которая в цикле

Этот ответ добавлен с нового Винграда - http://vingrad.com

Angel666

Дата 18.10.2015, 23:25 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 0
Регистрация: 8.9.2011

Репутация: нет
Всего: 1

n что за переменная где она у тебя определяется???

Этот ответ добавлен с нового Винграда - http://vingrad.com

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Программирование, связанное с MS Office \| Следующая тема »