если исходить из твоего примера, то разделитель элементов X у тебя является пробел, а Y будет перевод строки, то есть "\n\r" вот и разбирай свой поток в динамический массив
пацаны знаю что тут шарят в делфи не мало людей, так вот прошу прогу простенькую, на мой взгляд для вас, написать на такую тему: шифрование и дешифрование методом вижинера. нужна сама прога с исходниками само собой... если что на кошеле есть 40+ р, знаю мало но всё готов отдать кто сделает сразу в пм пишите! завтра в обед уже сдать надо.
becensed я это в нэте тоже находил... эта прога не дешифрует + какая-то левая таблица справа... сделайте чтобы она дешифровала плз! и вместо таблицы вставить текст, в чем заключается метод вижинера
Прошу откликнуться тех, кто знает assembler, и у кого есть пара минут свободного времени. Мы только начали изучать asm, но задание не совсем простое для новичка Нужно написать программу, которая находить количество делителей числа 18137. Буду рад любой помощи. Спасибо заранее.
Если я верно понял, то надо на ассемблере и под мс-дос. Примерно так: Code: .model tiny .code .386 org 100h start: xor di, di xor si, si xor ax, ax mov cx, 2 mov Result, ax mov bx, Number lp1: cmp bx, cx jle max check: mov ax, bx cwd idiv cx test dx, dx jne found inc si found: inc cx cmp bx, cx jg check max: cmp si, Result jle nxt mov Result, si nxt: xor si, si inc di cmp bx, di jg lp1 done: std lea di, StringEnd-1 mov ax, Result mov cx, 10 repeat: xor dx, dx div cx xchg ax, dx add al, '0' stosb xchg ax, dx or ax, ax jne repeat mov ah, 9 lea dx, [di+1] int 21h ret Number dw 18137 Result dw ? String db 5 dup (?), '$' StringEnd = $-1 end start Может там есть какая-то формула, не знаю. Здесь просто идет цикл, в котором число делится на все от 2 до самого себя-1 и проверяется остаток от деления. Если равен нулю, то увеличиваем количество делителей. В общем где-то так TASM для сборки.
Написать программу, которая выполняет операцию над матрицей целых чисел. Матрицу следует размещать в динамической памяти. Размер матрицы указывает пользователь после запуска программы. Матрица заполняется случайными числами. Программа выводит исходную матрицу на экран, осуществляет операцию согласно варианту работы (см. ниже), после чего выводит преобразованную матрицу на экран. Само задание: Исключить из матрицы столбцы и строки, в которых нечетных элементов меньше, чем четных. В результате преобразования должна измениться матрица, просто вывести результат преобразования на экран недостаточно. Код, выполняющий операцию над матрицей, оформить в виде функции, которой передается указатель на матрицу и размерность матрицы. В вариантах, где требуется изменение размеров матрицы, рассмотрите возможность использования функции стандартной библиотеки С realloc(). Замечание 5. Если в варианте задания требуется вводить дополнительные параметры, кроме размера матрицы, то делать это следует после вывода исходной матрицы на экран. В вариантах, где требуется вычисление характеристик для столбца или строки, предусмотреть возможность вывода значений характеристик на экран.
нужна помощь.... Используя алгоритм Дейкстры, переобразовать оператор языка Паскаль... IF Z IN S THEN A:=A+[Z] в постфиксную польскую запись. S и А ----- множества. Спасибо!
Все правильно поняли, под MS-DOS Правда к сожалению у меня компилируется, но ничего не работает Вижу непонятные символы. Это даже после того, что я добавил в начало Starta : Code: mov ax,@data mov ds,ax (data инициализировална, все нормально) P.S> Большое спасибо, что взялся
Это .сом-файл. Собирать его надо так: Code: tasm file.asm tlink /t/x file.obj Если тебе надо прогу с тем кодом, что привел ты (@data), то это уже .ехе-файл. Чтоб собрать, надо немного переделать: Code: ;tasm me.asm ;tlink /x me.obj .model small .stack 100h .386 .data Number dw 18137 Result dw ? String db 5 dup (?), '$' StringEnd = $-1 .code start: mov ax, @data mov ds, ax mov es, ax xor ax, ax xor si, si mov cx, 2 mov Result, ax mov bx, Number lp1: cmp bx, cx jle max check: mov ax, bx cwd idiv cx test dx, dx jne found inc si found: inc cx cmp bx, cx jg check max: cmp si, Result jle nxt mov Result, si nxt: xor si, si inc di cmp bx, di jg lp1 done: std lea di, StringEnd-1 mov ax, Result mov cx, 10 repeat: xor dx, dx div cx xchg ax, dx add al, '0' stosb xchg ax, dx or ax, ax jne repeat mov ah, 9 lea dx, [di+1] int 21h mov ax, 4c00h int 21h end start
Ааа, вот в чем дело?! Спасибо огромное за разъяснения!!! Ребят, не пожалейте добавьте репутации этому человеку - он меня спас просто p.s. Это совсем не обязательно делать, сейчас попробую разобраться сам, но не трудно вывести все найденные делители в цикле?
не нашел более подходящей темы надо смоделировать двойной маятник в матлабе, используя численные методы решения дифуров. буду рад помощи. готов оплатить работу, если потребуется #407507
Не трудно. Это может выглядеть примерно так: Code: ; ; tasm me.asm ; tlink /t/x me.obj ; .model tiny .code .386 org 100h start: xor di, di xor si, si xor ax, ax mov cx, 2 mov Result, ax mov bx, Number lp1: cmp bx, cx jle max check: mov ax, bx cwd idiv cx test dx, dx jne found inc si pusha call prnt popa found: inc cx cmp bx, cx jg check max: cmp si, Result jle nxt mov Result, si nxt: xor si, si inc di cmp bx, di jg lp1 done: mov ax, Result push ax mov ah, 9h lea dx, MsgResult int 21h pop ax jmp _jmp prnt: push ax mov ah, 9h lea dx, MsgDelitel int 21h pop ax _jmp: std lea di, StringEnd-1 mov cx, 10 repeat: xor dx, dx div cx xchg ax, dx add al, '0' stosb xchg ax, dx or ax, ax jne repeat mov ah, 9 lea dx, [di+1] int 21h mov ah, 9 lea dx, crlf int 21h ret Number dw 18137 Result dw ? String db 5 dup (?), '$' StringEnd = $-1 MsgResult db 'Vsego delitelei: $' MsgDelitel db 'Delitel: $' crlf db 13,10,'$' end start
Т.К только начал Изучать Си, испытываю трудности в написании кода. Кто сможет взяться за лабораторную по компьютерной графике, стучите 563923014 Цена , сроки - все в асе. Буду признателен
Нужен полный проект игры пятнашки для студента 1 курса универа написанный на С++ билдере, буду очень благодарен, а то мучаюсь уже долго(