Надо составить блок схему

@sergey171193 · Регистрация: 25.02.2012

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

составить блок схему

Visual Basic

Sub Main()
Dim x As Single, I As Byte, y As Single, n As Byte
x = InputBox("x=")
n = InputBox("n=", , 20)
For I = 1 To n
y = y + 1 / ((2 * I - 1) * x ^ (2 * I - 1))
Next
 Sheets("Ëèñò1").Cells(1, 1) = y
End Sub

@Dimon_bogoduhov · 09.03.2012, 13:45

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

составить блок схему

Не по теме:

Cколько ты ещё раз будешь создавать эту тему???

@Dimon_bogoduhov 126 / 61 / 2 Регистрация: 15.02.2012 Сообщений: 127
	09.03.2012, 13:45	2
	Сообщение от sergey171193 составить блок схему Не по теме: Cколько ты ещё раз будешь создавать эту тему??? Миниатюры 0