-
Постов
349 -
Зарегистрирован
-
Посещение
Тип контента
Профили
Форумы
Блоги
Галерея
События
Весь контент martinges
-
а вы уверены что правильно используете функцию pow?
-
Private Sub CommandButton1_Click() //насяльника 1 кнопку нажал Cells.Clear // насяльника сказал очистить все Randomize // насяльника врубил шайтан случайную машинку For i = 1 To 5 //насяльника сказал делать 5 раз For j = 1 To 6 //насяльника сказал делать 6 раз Cells(i, j) = Int(Rnd * 201 - 100) // сложить в ячейку целое число из случайного диапазона) Next j // j немножко подросло Next i // i немножко подросло Exit Sub // на выход End Sub // на выход я сказал Private Sub CommandButton2_Click() // насяльника 2 кнопку нажал Dim max As Integer // контейнер для МАКСИМУМа x1 = 0 // на ноль помножу (с) из Советского фильма For i = 1 To 5 // цикл с параметром x1 = x1 + Cells(i, 1) // накапливаем сумму) Next i // отправляем бегунок в путь дальше) Cells(7, 1) = x1 // складываем в ячейку, то что было в x1 x2 = 0 // смотри предыдущий пункт For i = 1 To 5 //смотри предыдущий пункт x2 = x2 + Cells(i, 2) //смотри предыдущий пункт Next i //смотри предыдущий пункт Cells(7, 2) = x2 //смотри предыдущий пункт x3 = 0 //смотри предыдущий пункт For i = 1 To 5 //смотри предыдущий пункт x3 = x3 + Cells(i, 3) //смотри предыдущий пункт Next i //смотри предыдущий пункт Cells(7, 3) = x3 //смотри предыдущий пункт x4 = 0 //смотри предыдущий пункт For i = 1 To 5 //смотри предыдущий пункт x4 = x4 + Cells(i, 4) //смотри предыдущий пункт Next i //смотри предыдущий пункт Cells(7, 4) = x4 //смотри предыдущий пункт x5 = 0 //смотри предыдущий пункт For i = 1 To 5 //смотри предыдущий пункт x5 = x5 + Cells(i, 5) //смотри предыдущий пункт Next i //смотри предыдущий пункт Cells(7, 5) = x5 //смотри предыдущий пункт x6 = 0 //смотри предыдущий пункт For i = 1 To 5 //смотри предыдущий пункт x6 = x6 + Cells(i, 6) //смотри предыдущий пункт Next i //смотри предыдущий пункт Cells(7, 6) = x6 //смотри предыдущий пункт max = Cells(7, 1) //локальный максимум - он же временный максимум For n = 1 To 6 // цикл по максимумам If Cells(7, n) > max Then // а вдруг текущий максимум больше нашего локального максимума max = Cells(7, n) // ну тогда менять надо локальный максимум maxn = n // индекс максимума) End If // конец условия) Next n // послали бегунок подальше) Cells(8, 1) = "Номер столбца с максимальной суммой элементов " & maxn // вывожу непонятливому юзверю номер ячейки End Sub //конец Private Sub CommandButton3_Click() //насяльника нажал третью кнопку x = 0 // обнулил x ирод For i = 1 To 5 // побежал по циклу x = x + Cells(i, 1) // просуммировал всё что нужно Next i // некст i (в переводе с английского ------> следующий i------> догадайтесь с 3 раз что это означает ) Cells(7, 1) = x //вывожу непонятливому юзверю сумму в предложенную ячейку End Sub // конец собственно P.S. Гмм код то работоспособен хоть нет?) пользуйся трассировкой сразу увидишь у какой переменной откуда ноги растут и для чего)
-
позвольте с вами не согласиться в некоторых моментах: 1) стоп хам как идея вполне адекватная(по все видимости) той ситуации которая царит сейчас в стране. Они хотели привлечь внимание - они его привлекли, может быть дебилов станет меньше. 2) они заняли некую гражданскую позицию и вначале даже пытались культурно всё обставлять... правда иногда это превращается в хамство и хулиганство(с этим согласен) Минусы: В роликах иногда проскальзывает не адекватное к ситуации насилие. Да водитель хам, но опускаясь до его уровня весь эффект ролика как то нивелируется(( P.S.duda про очереди - избито и затерто конечно...но старики все таки заслужили наверное проходить в свою, а может быть даже вне очереди.. вы так не считаете? про лозунги - гмм как там было сказано то в библии помойму) и киньте камень те кто без греха.. к чему я это)) если не начнет хоть кто то) то не начнет никто)
-
В глухую деревню его на перевоспитание. И маму бы перестал на хер посылать(иначе бы без зубов остался и правильно), и похудел бы паренек. P.S. Становится страшно за свою старость) представляю, что буду встречать старость среди компьютерных задротов, получающих удовольствие от просмотра отрывающихся голов и моря крови вокруг.....
-
тогда эти шары летают чертовски быстро)) от горизонта до горизонта минуты две) и чертовски высоко))
-
эммм.... либо я схожу с ума, либо наш могучий спутник уже упал чтоли?)) предистория: загоняя в гараж машину, видел пролетающие предметы яркого красного цвета примерное время 22-42 до 22-45 и потом еще один 22-46, снял на видео правда видео какое то хреновое) летели красиво ярко и быстро) примерное направление левый берег мелькомбинат. P.S. Развейте мои сомнения в трезвости моего ума)) кто-нибудь их видел?))
-
гг точно)) вспомнил) соседи - пузырек обмен - фиксация одного и обмен по второму циклу вставка - побегушки сначала с малого массива потом расширяешь P.S. Koshak ну вот видишь как плохо нихрена не проверять код на работоспособность
-
тааакс стоп.... сам алгоритм я как то хреново просмотрел)) это же не метод обмена(пузырька) у тебя во внутреннем цикле кавардак)) по идее итерация и ты опустил в конец(начало) самый лёгкий или самый тяжелый элемент и на следующий итерации его не учитываешь) а в твоем цикле ты "на всякий случай" его все равно проверишь в итоге избыточное количество итераций for (i=0;i for (j=i+1;j ну или for (i=n;i>0;i--) for (j=0;j
-
for (i=0;i for (j=1;j //n=10, внутренний цикл n-1 итераций, внешний n итераций----> n*(n-1)=n^2-n=90 //переменная q у тебя вертится именно 90 раз)
-
)) Вам хочется там жить? а нужны ли вы там?) По теме: Хочется попутешествовать, но думаю что вернуться всё таки захочется Иностранцы с которыми я общался говорили, что у нас интересно жить(хотя если рассуждать объективно наверное у них жить скучно, но цивилизованнее )
-
Ужасно оформил страшный интеграл у тебя получился)) синус в кубе от cos(x) dx страшный интеграл По теме: а) заносишь косинус под дифференциал без потери знака)) так как производная знака нам не даст) получаешь индеграл с синусом и диференциал от синуса) а дальше прям таки как по маслу интеграл от x в степени n равен x в степени n+1 деленное на n+1. Таков ход решения) в)выносишь 1/2 из под интеграла как постоянную и под дифференциалом получаешь 2x дальше я как то подзабыл)) помойму получается arccos^2(2x)/4(потом подумал ответ с арккосинусом неправильный ) г)занеси по дифференциал sqrt(x) из знаменателя(не забудь про знак и коэффициент ) получишь дифференциал от sqrt(x). А дальше прям таки праздник)) формула производной арккотангенса получаешь дифференциал от арккотангенса от sqrt(x) А Дальше сам догадаешься я думаю Площади две параболы. Одна верх рогами другая взниз рогами ) получаем замкнутую фигуру находим точки пересечения. приравниваем их друг другу-----> sqr(x)=3-2*sqr(x). Таким образом нашли пределы интегрирования Из площади параболы верхней(по пределам интегрирования и нижняя граница это OX-абцисс) вычтем площадь параболы нижней(по пределам интегрирования и нижня граница опять таки OX-абцисс) и вуаля получаем площадь фигуры, заключенной между кривыми. P.S. В учебнике подробно описан алгоритм решения)) зря не смотришь)
-
к сожалению в таком виде он не компилился я его переработал в удобный мне формат) proga segment assume cs:proga,ss:proga,ds:proga,es:proga org 100h start: mov si, 0 mov al, offset num1[si] inc si metka1: mov bl, offset num1[si] cmp al, bl jns metka mov al, bl metka: inc si cmp si, 9 js metka1 aam mov dl, ah mov dh, al or dl, 30h or dh, 30h mov ah, 02h int 21h xchg dl, dh int 21h int 20h num1 db 45,12,56,72,48,56,90,24,1,19 proga ends end start вот что то типа такого я ваял)) впринципе тоже самое) попробуй скомпилить под рукой нету asma незнаю может накосячил где-нить)
-
формат тини я компилил его как com файл и все нормально работает)) а в exe выдает гадость)
-
danger тссс ну что ты человека спонтолыку сбиваешь)) защита диплома должна навевать ужас и трепет по теме: забей) нормально всё будет)) сомневаюсь, что их заветная мечта тебя завалить
-
я уже стар работать по ночам.... ) забить и уснуть?))))
-
Sardu Не обижайтесь)) но милая мордашка надоедает девушкам) они должны думать о будущем) про деньги) читаем внимательно: я не покупал отношение девушки деньгами) просто хотелось сделать приятное P.S. интеЛЛект
-
.... И как же ты её поразил.. Мечом в глаз (с) БашОрг Гмм ну платить за всё не надо наверное)) но как некий жест почему нет
-
гмм, а вам это спать мешать будет?) ) по теме: судя по скорости перевода.. скоро можно будет увидеть новую версию?))
-
мдя уже 2 часа пытаюсь начать что-то делать...и не получается) надо пойти в отпуск)
-
)) Если тебя допустили до защиты значит большую часть нервотрепки ты уже прошел) Ну как проходит)) сидят люди, слушают тебя)) Обычно задают вопросы типа.... "А в чем научная новизна вашего метода" "Отличие вашей программы от аналогов" "Ваш практический вклад(типа а ты что-нибудь привнес в этот метод например точность увеличил)" или по мат. модели что-нибудь спросят)) и плавненько уйдут в математику, где тебя и загонят по колено в болото шучу)) если что науч.рук вытянет)) наверное)
-
Гммм моё мнение.... Подходи серьёзней к этому. Сформируй своё резюме....Понимаешь, если ты скажешь цитирую " я умею что то по части IT" это не совсем то... Если умеешь администрировать, то что умеешь какой опыт Если умеешь кодить, то на чём и с использованием каких технологий Если есть какие то наработки, укажи Если были предыдущие места работы укажи где) Если чего то незнаешь, то что они спрашивают, но примерно представляешь, то клятвенно обещай что ты сверхспособный и нереально быстро учишься)) А наобум приходишь и говоришь я такой красавец возьмите меня, помойму маленько не серьёзно
-
)) я регистры просматривал он из 5h слепил ah=9 al=5 с этим я полностью согласен))) а что за действия он производил до этого) не пойму)) гыыыы эврика я не так компилил)))) это нахождение максимального из ряда)))) .model tiny ;моделька памяти .stack 100h ; для стэка .data ; пошли данные num1 db 45,12,56,72,48,56,90,24,1,19 ; сами данные собственно .code ;пошел код start: mov si, 0 ;обнуляем бегунок mov al, offset num1[si] ;считали первый элемент inc si ;увеличили счетчик metka1: mov bl, offset num1[si] ; считали si элемент ряда cmp al, bl ;сравнили какой из них больше jns metka ; al больше прыгаем на метку) смотрим состояние флажка mov al, bl ; ух ты bl больше)) metka: inc si ; увеличиваем бегунок cmp si, 9 ; а мы дошли до конца ряда? js metka1 ; нефига подобного не дошли aam ; хотим получить удобоваримое число а так у нас валяется 5a а станет ah=9h al=00h mov dl, ah ; скидываем циферки для вывода) mov dh, al ;скидываем цифирки для вывода or dl, 30h ; надо привести к ascii коду иначе выдаст символы из начала типа сердечек всяких квадратиков or dh, 30h ; аналогично mov ah, 02h ; указываем что надо вывести символ int 21h ;выводим его xchg dl, dh ;поменяли символы)) ведь и второй символ надо вывести int 21h ; выводим mov ah, 4ch ;пора выходить int 21h ; выходим end start ; и жили они долго и счастливо а во второй задачке стэк куда то делся.....
-
единственный конструктивный пост Из разряда кто виноват вроде понятно но практически никто не писал что делать
-
гг может приведу не совсем правильный пример) забиваем www.bsu.ru - о чудо все на русском)) а на верху есть кнопочки Буряад English и представляешь) если по ним кликнуть открываются на странице соответсвенно на бурятском или английском) а если не хочется никто не запрещал оставаться на русской версии сайта)) P.S. Программная реализация локализации на бурятский язык улановки наверное будет несколько другой, но предполагаю что основная идея будет той же