VBNet - Форум - ПОМОГИТЕ С ПРОГОЙ!!!ПЛИЗ!!!

Вопрос: ПОМОГИТЕ С ПРОГОЙ!!!ПЛИЗ!!! Добавлено: 23.06.09 18:22

Автор вопроса:

Помогите пожалуйста!!!Я никак не могу додуматься,как составить вот такую программу:
"Составить программу для вычисления суммы чисел от 2 до 10 (2<i<10) с шагом изменения 2"
От этого зависит жизнь моя!!
Ответить

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

Номер ответа: 1 Автор ответа: Вопросов: 1 Ответов: 2	Профиль \| \| #1	Добавлено: 23.06.09 18:27
	Если что(ну вдруг какие-нибудь очень хорощие люди решат помочь мне,мой емэйл sveta_20.05@mail.ru) Ответить

Номер ответа: 2 Автор ответа: AntiOxygene (MegaDefender) Вопросов: 2 Ответов: 107	Web-сайт: safetyAV.narod.ru Профиль \| \| #2	Добавлено: 23.06.09 18:42
	Dim i As Integer For i = 2 To 10 Step 2 'ваши вычисления Next i ? Ответить

Номер ответа: 3 Автор ответа: mc-black ICQ: 308-534-060 Вопросов: 20 Ответов: 1860	Web-сайт: mc-black.narod.ru/dzp.htm Профиль \| \| #3	Добавлено: 23.06.09 21:03
	Sub MyMacro Dim i As Integer Dim s As Ineger For i = 2 To 10 s = s + i Next i MsgBox "Сумма от 2 до 10 равна " & CStr(s) End Sub Теперь вы мне обязаны своей жизнью Хотя это слишком много, 100 рублей достаточно ))) Ответить

Номер ответа: 4 Автор ответа: ☺♣FIO♣☺ Вопросов: 35 Ответов: 160	Профиль \| \| #4	Добавлено: 23.06.09 21:41
	Ответить

Номер ответа: 5 Автор ответа: AntiOxygene (MegaDefender) Вопросов: 2 Ответов: 107	Web-сайт: safetyAV.narod.ru Профиль \| \| #5	Добавлено: 23.06.09 22:03
	А в чём сложность всего этого?! Cмешные задания дают вам, Athena. У меня в школе задания (6 класс) и то сложнее. Ответить

Номер ответа: 6 Автор ответа: AntiOxygene (MegaDefender) Вопросов: 2 Ответов: 107	Web-сайт: safetyAV.narod.ru Профиль \| \| #6	Добавлено: 23.06.09 22:17
	MC-Black, ты украл мой код, распространенный под лицензией GPL, добавив одну строчку! (шутка) Код: Function YourFunctionName (a As Integer, b As Integer) On Error GoTo errHandler Dim i As Integer Dim c As Integer For i = a To b DoEvents c = c + i Next i MsgBox CStr(c) Exit Function errHandler: MsgBox "Возникла непредвиденная ошибка" End Function Ответить

Номер ответа: 7 Автор ответа: Вопросов: 1 Ответов: 2	Профиль \| \| #7	Добавлено: 23.06.09 23:52
	Ну кеому смешные,а кому не очень=(.Не понимаю этого=(А вам большое спасибо!!Обязана и жизнью,и честью,и репутацией)) Ответить

Номер ответа: 8 Автор ответа: AntiOxygene (MegaDefender) Вопросов: 2 Ответов: 107	Web-сайт: safetyAV.narod.ru Профиль \| \| #8	Добавлено: 24.06.09 00:52
	А чью функцию вы использовали, Athena, мою? Ответить

Номер ответа: 9 Автор ответа: Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979	Web-сайт: sharpc.livejournal.com Профиль \| \| #9	Добавлено: 24.06.09 02:32
	Не дорого же стоит ваша репутация... Ответить

Номер ответа: 10 Автор ответа: Ra$cal ICQ: 8068014 Вопросов: 18 Ответов: 817	Web-сайт: www.rascalspb.narod.ru Профиль \| \| #10	Добавлено: 24.06.09 06:17
	я бы сконцентрировался на чести... Ответить

Номер ответа: 11 Автор ответа: Jasmin Вопросов: 23 Ответов: 417	Профиль \| \| #11	Добавлено: 24.06.09 20:36
	с шагом изменения 2 А где шаг ? For i = a To b Step 2 Ответить

Номер ответа: 12 Автор ответа: $@ny@PG ICQ: 468469477 Вопросов: 71 Ответов: 196	Профиль \| \| #12	Добавлено: 24.06.09 22:26
	Прикольное задание Ответить

Номер ответа: 13 Автор ответа: AntiOxygene (MegaDefender) Вопросов: 2 Ответов: 107	Web-сайт: safetyAV.narod.ru Профиль \| \| #13	Добавлено: 24.06.09 22:32
	А зачем?! Результат изменится? Вообще-то я в ответе #2 степ 2 написал. Ответить

Номер ответа: 14 Автор ответа: Jasmin Вопросов: 23 Ответов: 417	Профиль \| \| #14	Добавлено: 25.06.09 20:19
	Ну мало ли... Может в вычислениях нужно будет. Я просто для чистоты ответа. Но не заметила почему-то, что уже есть в ответе №2. Сорри. Ответить

Номер ответа: 15 Автор ответа: AntiOxygene (MegaDefender) Вопросов: 2 Ответов: 107	Web-сайт: safetyAV.narod.ru Профиль \| \| #15	Добавлено: 25.06.09 23:48
	Ra$cal, почему? Ответить

Страница: 1 | 2 | 3 |