VBNet - Форум - задача на Microsoft Visual Basic 6.0

Вопрос: задача на Microsoft Visual Basic 6.0 Добавлено: 09.04.11 14:57

Автор вопроса: Яблоко | ICQ: 582888880

http://content.foto.mail.ru/mail/xakep2email/_answers/i-33.jpg
Помогите пожалуйста решить
Ответить

Ответы Всего ответов: 11

Номер ответа: 1 Автор ответа: Winand Вопросов: 87 Ответов: 2795	Web-сайт: winandfx.narod.ru Профиль \| Цитата \| #1	Добавлено: 09.04.11 15:51
	dim i as long, n as long,res as double n = ... for i = 1 to n res = res + 1 / (2*i)^2 next i debug.print res Ответить

Номер ответа: 2 Автор ответа: Winand Вопросов: 87 Ответов: 2795	Web-сайт: winandfx.narod.ru Профиль \| Цитата \| #2	Добавлено: 09.04.11 15:53
	а ведь я мог эти 20 секунд жизни потратить на что-нибудь полезное... Ответить

Номер ответа: 3 Автор ответа: Яблоко ICQ: 582888880 Вопросов: 5 Ответов: 13	Профиль \| Цитата \| #3	Добавлено: 09.04.11 16:57
	я не понял. каким будет код? Ответить

Номер ответа: 4 Автор ответа: СанСаныч Вопросов: 3 Ответов: 118	Профиль \| Цитата \| #4	Добавлено: 09.04.11 17:38
	Winand пишет: а ведь я мог эти 20 секунд жизни потратить на что-нибудь полезное... Дерябнуть рюмку чая например... Яблоко пишет: я не понял. каким будет код? Осиливаем любую книжку по вб и еще раз смотрим на пост №1 Ответить

Номер ответа: 5 Автор ответа: Яблоко ICQ: 582888880 Вопросов: 5 Ответов: 13	Профиль \| Цитата \| #5	Добавлено: 09.04.11 19:02
	просто я такой нищий на знания по программированию Ответить

Номер ответа: 6 Автор ответа: Яблоко ICQ: 582888880 Вопросов: 5 Ответов: 13	Профиль \| Цитата \| #6	Добавлено: 09.04.11 19:04
	просто я такой нищий на знания по программированию. калькулятор и то с большим трудом пишу. помогите пожалуйста Ответить

Номер ответа: 7 Автор ответа: Artyom Разработчик Вопросов: 130 Ответов: 6602	Профиль \| Цитата \| #7	Добавлено: 09.04.11 22:05
	Dim N As Int32 = 100 Dim Result As Double = Enumerable. Range(1, N). Sum(Function(i) 1 / (2 * i) ^ 2) Можно также использовать возможности современных многоядерных процессоров Dim N As Int32 = 100 Dim Result As Double = Enumerable. Range(1, N). AsParallel(). Sum(Function(i) 1 / (2 * i) ^ 2) Ответить

Номер ответа: 8 Автор ответа: Яблоко ICQ: 582888880 Вопросов: 5 Ответов: 13	Профиль \| Цитата \| #8	Добавлено: 10.04.11 09:48
	огромное вам всем спасибо . все задачи такого типа получились. Ответить

Номер ответа: 9 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| Цитата \| #9	Добавлено: 10.04.11 15:49
	артем ты совсем зашарпился, забыл underscore в конце предложений Ответить

Номер ответа: 10 Автор ответа: СанСаныч Вопросов: 3 Ответов: 118	Профиль \| Цитата \| #10	Добавлено: 10.04.11 16:49
	Artyom пишет: Можно также использовать возможности современных многоядерных процессоров OMG!!! It's vb6???? Ответить

Номер ответа: 11 Автор ответа: СанСаныч Вопросов: 3 Ответов: 118	Профиль \| Цитата \| #11	Добавлено: 10.04.11 16:50
	В сабже вроде vb6.0 просили, а тут уже ближе к vb10.0 Ответить

Страница: 1 |