Форум АНТИЧАТ - Студентам с лабораторными сюда

УСТРАНЕНИЕ КОНКУРЕНТОВ. БЛОКИРОВКА ДОМЕНОВ, БЛОКИРОВКА ИНСТАГРАМ/ТЕЛЕГРАМ И ДРУГОЕ. ПРОВЕРЕННЫЙ СЕЛЛЕР.

Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz

		Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
Студентам с лабораторными сюда

Страница 82 из 287

Опции темы

Поиск в этой теме

Опции просмотра

#811

27.11.2008, 00:34

Olegros911

Участник форума

Регистрация: 07.04.2008

Сообщений: 166

Провел на форуме:
1116075

Репутация: 68

Отправить сообщение для Olegros911 с помощью ICQ

name "Minimal"
org 100h
masiv db 110b,33,0F0h,1111b,251
mov cx,5
Min1: mov dx, masiv [si]
cmp bx,dx
jb Min2
inc si
loop Min1
Min2: mov dl,dx

помогите исправить ошибку в програме нужно чтобы она искала минимальное значение с ряда чисел!!!!!!
всем ++++++++++++++++++++++++++++++

Нужно решить типовые задачи по Delphi))

#812

27.11.2008, 01:11

dars_go

Новичок

Регистрация: 22.09.2007

Сообщений: 5

Провел на форуме:
95550

Репутация: 0

Нужно решить типовые задачи по Delphi))

Вот задачи, достаточно простые:
Массивы:
8.В данном массиве целых чисел найти минимальное значение и все номера элементов массива, равных ему.
11.Вычислить произведение сумм положительных и отрицательных элементов массива A[1..N].
18.В данной последовательности чисел найти минимальное значение среди положительных элементов и все номера членов последовательности, равных ему.
21.Составить программу, увеличивающую ненулевые элементы линейного вещественного массива Y[1..N] на 1.
28.Дан массив А[1..N] и число Х. Написать программу, который печатает "ДА", если Х совпадает с одним из элементов данноо массива, и "НЕТ" - в противном случае.
Условия:
1.Решить квадратное уравнение (a#0)

Предусловие:
16.Составить программу, проверяющую, является ли заданное натуральное число палиндромом, то есть таким, десятичная запись которого читается одинаково слева направо и справа налево.

Пост:
3.Числа Фибоначчи (fn) определяется формулами: f0 = f1 = 1; fn = fn = fn-1 + fn-2 при n=2, 3,... Составить программу:
a.определения f - 40-е число Фибоначчи;
b.поиска f - первого числа Фибоначчи, большего m (m>1);
c.вычисления s - суммы всех чисел Фибоначчи, которые не превосходят 1000.

Вложение:
12.Составить программу, печатающую для данного натурального числа k-ю цифру последовательности:
a.12345678910..., в которой выписаны подряд все натуральные числа;
b.14916253649..., в которой выписаны подряд квадраты всех натуральных чисел;
c.1123581321..., в которой выписаны подряд все числа Фибоначчи.

Счетчик:
5.Составить программу вычисления суммы кубов чисел от 25 до 125.

Если интересует стучать 4194206 , всё оплачу..

#813

27.11.2008, 23:53

0verbreaK

Постоянный

Регистрация: 30.04.2008

Сообщений: 323

Провел на форуме:
379101

Репутация: 136

Olegros911

Код:

name "Minimal"
org 100h
masiv db 110b,33,0F0h,1111b,251 
mov cx,5
xor si, si	; итератор равен 0

;в bx должно находится какое нибудь
;начальное минимальное значение
;допустим 33
mov bx, 33

Min1: mov dx, masiv[si] ; первый элемент массива

;сравниваем 
cmp bx,dx
jb Min2
inc si
loop Min1

Min2: mov dl,dx

add: Но обычно берется некоторое число, которое сравнивается с первым элементом массива и если оно меньше эталонного минимального числа, то затем сравниваем остальные элементы с последним. Думаю ты теперь понял. (Код не проверял набирал так)

Последний раз редактировалось 0verbreaK; 27.11.2008 в 23:57..

#814

28.11.2008, 13:39

wasaaap

Новичок

Регистрация: 28.11.2008

Сообщений: 1

Провел на форуме:
4072

Репутация: 0

День добрый!
Подскажите пожалуйста, как на ассемблере сделать ввод десятичного числа со знаком с клавиатуры. Желательно с коментариями)

#815

29.11.2008, 13:21

MCSnake

Участник форума

Регистрация: 11.06.2008

Сообщений: 142

Провел на форуме:
540493

Репутация: 38

Отправить сообщение для MCSnake с помощью ICQ

это я в нете подобную задачу нашел, нужно написать на делфи это решение...
нород кто может выручите(( + сколько смогу столько и сдлаю...

З.Ы. не спрашивайте какой .... дал это задание, вы такой т....ри которая ведет у нас н знаете((

Последний раз редактировалось MCSnake; 29.11.2008 в 13:23..

#816

29.11.2008, 14:26

F&D

Участник форума

Регистрация: 06.11.2008

Сообщений: 208

Провел на форуме:
261838

Репутация: 9

Доброго времени суток. Надеюсь кто-то из здесь присутствубщих имел когда нибудь дело с отладочным стендом EV8031/AVR (V. 3.2), вот по нему у меня и лаба. Изначально задание было таким:
По нажатию кнопки SW15 включать «бегущий огонь» на линейке светодиодов HL1-HL8. Код этой проги вот:

Код:

CSEG
ORG 0
Continue:
          mov A, #10000000b
          mov DPTR, #0A006h
          movx @DPTR, A 		;отменить гашение знакомест С_инд
          mov A, #0h 		;записать в Акк. число 04
          mov DPTR, #0A006h 	;установить в DPTR адрес левой 
;пары знакомест С_инд
          movx @DPTR, A 		
          mov DPTR, #0B006h 	;установить в DPTR адрес правой 
;пары знакомест С_инд
          movx @DPTR, A 		
CALL ZAD 			;вызов подпрограммы задержки
          mov A, #10000000b
          mov DPTR, #0A006h
          movx @DPTR, A 	 ;погасить все знакоместа С_инд
         
CALL ZAD 		;вызов подпрограммы задержки
          mov A, #01000000b
          mov DPTR, #0A006h
          movx @DPTR, A 		
CALL ZAD	
          mov A, #00100000b
          mov DPTR, #0A006h
          movx @DPTR, A
CALL ZAD 			
          mov A, #00010000b
          mov DPTR, #0A006h
          movx @DPTR, A
CALL ZAD					
          mov A, #00001000b
          mov DPTR, #0A006h
          movx @DPTR, A  		
CALL ZAD		 			
          mov A, #00000100b
          mov DPTR, #0A006h
          movx @DPTR, A 		
          
CALL ZAD 			
          mov A, #00000010b
          mov DPTR, #0A006h
          movx @DPTR, A
 		
CALL ZAD 			
          mov A, #00000001b
          mov DPTR, #0A006h
          movx @DPTR, A
          CALL ZAD
          jmp Continue 	  ;переход на начало программы

ZAD: 				;подпрограмма задержки
          mov R1, #0FFh
C2:     mov R2, #0FFh
C4:     djnz R2, C4
          djnz R1, C2
          
ret 			;выход из подпрограммы
END

Но потом последовало дополнительное задание, звучит: При нажатии кнопки SW15 включать «бегущий огонь» на линейке светодиодов HL1-HL8, при еще одном нажатии "бегущий огонь" должен остановиться, при еще одно - дальше "побежать"....
думал две пары как сделать(даже на С++ пытался) - не могу...
Помогите плиз...

Последний раз редактировалось F&D; 29.11.2008 в 14:31..

#817

29.11.2008, 16:21

Cereus

Новичок

Регистрация: 09.11.2008

Сообщений: 15

Провел на форуме:
59870

Репутация: 16

Цитата:

Сообщение от MCSnake

...
это я в нете подобную задачу нашел, нужно написать на делфи это решение...
нород кто может выручите(( + сколько смогу столько и сдлаю...

З.Ы. не спрашивайте какой .... дал это задание, вы такой т....ри которая ведет у нас н знаете((

Чувствую задачка интересная, но я не догоняю условия: даны три числа... А что найти?

#818

29.11.2008, 22:12

VERte][

Moderator - Level 7

Регистрация: 17.05.2007

Сообщений: 220

Провел на форуме:
3013539

Репутация: 441

Цитата:

Сообщение от 0verbreaK

Olegros911

Код:

name "Minimal"
org 100h
masiv db 110b,33,0F0h,1111b,251 
mov cx,5
xor si, si	; итератор равен 0

;в bx должно находится какое нибудь
;начальное минимальное значение
;допустим 33
mov bx, 33

Min1: mov dx, masiv[si] ; первый элемент массива

;сравниваем 
cmp bx,dx
jb Min2
add si,2
loop Min1

Min2: mov dl,dx

эээ ну во-первых таким образом прога дойдет до первого меньшего заданного числа и остановится, если дальше в массиве будет меньшее число, то будет не верный результат, во-вторых что это за конструкция такая mov dl,dx ?????
на мой взгляд это должно выглядеть так:

Код:

name "Minimal"
code segment
assume cs:code, ds:code, ss:code
org 100h

start:
mov cx,6
xor si, si	; итератор равен 0

;в bx должно находится какое нибудь
;начальное минимальное значение
;допустим 10
mov bx, 10

Min1: mov dx, masiv[si] ; первый элемент массива

;сравниваем 
cmp bx,dx
jb l
mov bx,dx
l:
inc si
loop Min1
ret
masiv dw 3,4,5,7,2,1
code ends
end start

результат в bx

Последний раз редактировалось VERte][; 30.11.2008 в 00:34.. Причина: step: word, thx 2 0verbreaK

#819

29.11.2008, 23:47

0verbreaK

Постоянный

Регистрация: 30.04.2008

Сообщений: 323

Провел на форуме:
379101

Репутация: 136

VERte][ ну во первых: я лишь поправил до более правильного и все.

а во вторых: у вас ошибка

Код:

;учитывая размерность элемента
;чтобы обратится адресу в памяти
Min1: mov dx, masiv[si*2] ; n-й элемент массива

#820

30.11.2008, 00:19

VERte][

Moderator - Level 7

Регистрация: 17.05.2007

Сообщений: 220

Провел на форуме:
3013539

Репутация: 441

Цитата:

Сообщение от 0verbreaK

VERte][ ну во первых: я лишь поправил до более правильного и все.

а во вторых: у вас ошибка

Код:

;учитывая размерность элемента
;чтобы обратится адресу в памяти
Min1: mov dx, masiv[si*2] ; n-й элемент массива

ну ошибочка синтаксическая, в спешке забыл, что иду по вордам, а не по байтам, а у вас была алгоритмическая ошибка,, что хуже =)

Страница 82 из 287

« Предыдущая тема | Следующая тема »

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Сюда выкладываем все проги для фрикринга мобильников, которых знаем!	nigger	Сотовый фрикинг	5	11.04.2009 11:15
Американским студентам запретили пользоваться Skype	KPOT_f!nd	Мировые новости	1	28.09.2006 03:47
Любителям квестов сюда!!	FoX's	Болталка	10	25.01.2005 20:42

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)

Быстрый переход