| Вопрос: проблема | Добавлено: 29.05.08 14:15 |
Автор вопроса:  naika | ICQ: 429904239 |
| Ответы | Всего ответов: 51 |
|
Номер ответа: 16 Автор ответа:  Winand Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #16 | Добавлено: 30.05.08 19:29 |
|
Лаб.3(2) Option Explicit
Private Sub Form_Load() Dim x As Integer, i As Integer, ret As Integer x = Val(InputBox("Введите число x:"  )
i = 0 Do i = i + 1 ret = ret + x * i Loop While (ret <= 1000) MsgBox "Сумма ряда: " & ret & vbNewLine & "Кол-во слагаемых: " & i End End Sub |
||
|
Номер ответа: 17 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #17 | Добавлено: 30.05.08 19:35 |
обожемой! А Шарп-то почему переменные не объявляет и пишет без отступов? 
|
||
|
Номер ответа: 18 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #18 | Добавлено: 30.05.08 19:40 |
|
Лаб.2(3) Option Explicit
Private Sub Form_Load() Dim x(100) As Integer, i As Integer, ret As Integer Call Randomize For i = 0 To 100 x(i) = Int(Rnd * 100) Next i For i = 0 To 100 If x(i) Mod 2 = 0 Then ret = ret + 1 Next i MsgBox "Кол-во четных чисел: " & ret End End Sub |
||
|
Номер ответа: 19 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #19 | Добавлено: 30.05.08 19:42 |
|
Точнее - это была "Лаб.3(3)"
В Лаб.3(2) не совсем понятен смысл х + х2 + х3 + ... Я так подумал, что х + х*2 + х*3 + ... |
||
|
Номер ответа: 20 Автор ответа: Smith ICQ: ненавижу Вопросов: 28 Ответов: 317 |
Web-сайт: Профиль | | #20 | Добавлено: 30.05.08 19:43 |
Как видишь здесь ТАКИЕ светлые головы, что над твоими лабами тут никто даже задумываться не стал 
Главное в конце не забудь поблагодарить всех и каждого в отдельности, погромче да попротяжнее. |
||
|
Номер ответа: 21 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #21 | Добавлено: 30.05.08 21:41 |
|
Переменные объявлять на VB6 - зло.
Отступы там были, только их форум сожрал. Как можешь догадаться, я не в IDE это писал, ни разу не компилировал и к предыдущей строчке не возвращался
|
||
|
Номер ответа: 22 Автор ответа: SmithICQ: ненавижу Вопросов: 28 Ответов: 317 |
Web-сайт: Профиль | | #22 | Добавлено: 30.05.08 21:51 |
|
Видно что в блокноте
Главное ты суть объяснил. |
||
|
Номер ответа: 23 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #23 | Добавлено: 30.05.08 23:04 |
|
Переменные объявлять на VB6 - зло. ШТО.
|
||
|
Номер ответа: 24 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #24 | Добавлено: 30.05.08 23:05 |
|
Главное ты суть объяснил. Кому нужна суть? нужны готовые для сдачи лабы
|
||
|
Номер ответа: 25 Автор ответа: SmithICQ: ненавижу Вопросов: 28 Ответов: 317 |
Web-сайт: Профиль | | #25 | Добавлено: 30.05.08 23:39 |
|
Winand ты нормальные примеры для осмысления дал.
Тебе 6+ Теперь рассмотрев код # пусть постарается сама сообразить что да как сделать. С математикой то у неё всё нормально. А на счет переменных не удивляйся, # любитъ подчеркнуть, что онъ сишникъ полупрофъ
|
||
|
Номер ответа: 26 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #26 | Добавлено: 31.05.08 00:06 |
|
си - это мощно, но сложно Все время путаюсь со всякими там указателями. Кое-как за 8 месяцев дополз до классов)
Зато очень радуют мелочи типа ++, +=, задание значения при объявлении, объявление счетчика внутри for(..){}. Удобно блин
|
||
|
Номер ответа: 27 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #27 | Добавлено: 31.05.08 06:22 |
|
полупрофъ
Сударь, вы осмелились меня оскорбить. Я требую сатисфакции! |
||
|
Номер ответа: 28 Автор ответа: SmithICQ: ненавижу Вопросов: 28 Ответов: 317 |
Web-сайт: Профиль | | #28 | Добавлено: 31.05.08 13:42 |
|
Профом ты станешь, когда начнешь зарабатывать этим.
Вообще нравиться тебе оскорбляться по пустякам. |
||
|
Номер ответа: 29 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #29 | Добавлено: 31.05.08 16:43 |
| — Сударь, Вы оскорбили меня, и я вызываю Вас на расстрел. | ||
|
Номер ответа: 30 Автор ответа: SmithICQ: ненавижу Вопросов: 28 Ответов: 317 |
Web-сайт: Профиль | | #30 | Добавлено: 31.05.08 17:02 |
|
Агент, это ты ли над # стебаешься?
А не боишься прогневить всевеликогосударя московского?
Или тоже за компанию решил меня вызвать на дуэль? |
||