Циклы for

@denis130697 · Регистрация: 28.07.2013

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста выполнить домашнее задание по Visual Basic.
Для заданных значений n и x вычислить значение выражения:

Комментарий модератора

Запрещено размещать задания и решения в виде картинок и других файлов с их текстом.

@Catstail · 08.06.2016, 12:00

Visual Basic

Function Task(x as double, n as integer) As double
   if n=1 then
     Task=sin(x)
   else
     Task=sin(x)+Task(sin(x),n-1)
   end if 
End function

@denis130697 · 08.06.2016, 12:18 **[ТС]**

Нельзя ли это сделать через цикл for?

~~Shersh~~ · 08.06.2016, 12:58

Сообщение от denis130697

цикл for?

Visual Basic

Sub asd()
x = 1
n = 3
sn = x
For i = 1 To n
  sn = Sin(sn)
  s = s + sn
Next
MsgBox s & vbLf & "Проверка (для n=3): " & Sin(x) + Sin(Sin(x)) + Sin(Sin(Sin(x)))
End Sub

@denis130697 · 08.06.2016, 13:52 **[ТС]**

Спасибо большое

@Catstail · 08.06.2016, 15:10

Сообщение от denis130697

Нельзя ли это сделать через цикл for?

- можно, но постно...

@fever brain · 08.06.2016, 15:53

Shersh с юбилеем Вас

~~Shersh~~ · 08.06.2016, 15:59

fever brain, испортил цыфру

@denis130697 0 / 0 / 0 Регистрация: 28.07.2013 Сообщений: 24
	08.06.2016, 12:18 [ТС]	3
	Нельзя ли это сделать через цикл for? 0

@denis130697 0 / 0 / 0 Регистрация: 28.07.2013 Сообщений: 24
	08.06.2016, 13:52 [ТС]	5
	Спасибо большое 0

@Catstail Модератор 36601 / 20330 / 4220 Регистрация: 12.02.2012 Сообщений: 33,640 Записей в блоге: 13
	08.06.2016, 15:10	6
	Сообщение от denis130697 Нельзя ли это сделать через цикл for? - можно, но постно... 1

@fever brain oh my god 1454 / 793 / 161 Регистрация: 05.01.2016 Сообщений: 2,307 Записей в блоге: 8
	08.06.2016, 15:53	7
	Shersh с юбилеем Вас Изображения 1

~~Shersh~~ Заблокирован
	08.06.2016, 15:59	8
	fever brain, испортил цыфру 0

Циклы for

Решение