/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Assembler (Ассемблер)

Выпуск № 782
от 18.06.2007, 05:35

Вопрос № 91.147

Эксперты решите пожалуйста мне задачи кто скоко может буду оч приочень благодарен!!!!! Дан массив из десяти знаковых чисел (слов или байт). Требуется: 1. Найти количество отрицательных чисел. Массив байт. 2. Найти сумму всех положительных и отрицательных чисел. Массив слов. 3. Найти сумму абсолютных величин. массив байт. 4. Найти количество положительных чисел. Массив байт. 5. Поменять местами пары соседних чисел. Массив слов. 6. Переставить числа в обратном порядке. Массив байт. 7. Заменить все отрицательные числа нулями. Массив байт. 8. Найти среднее арифметическое чисел. Массив слов. 9. Найти количество чисел больших 10h. Массив слов. 10. Найти наименьшее по абсолютной величине числа. Массив байт. 11. Найти наибольшее отрицательное число. Массив байт. 12. Найти произведение положительных элементов последовательности. Массив слов. 13. Найти среднее арифметическое квадратов ненулевых элементов по-следовательности. Массив слов. 14. Найти полусумму наибольшего и наименьшего чисел. Массив байт. 15. Найти среднее арифметическое отрицательных элементов последо-вательности. Массив слов. 16. Найти сколько в массиве чисел больше 12h и меньше 0Afh. Массив байт. 17. Найти есть ли в массиве два нуля, идущих подряд. Массив слов. 18. Найти сумму абсолютных величин, меньших 6. Массив байт. 19. Найти среднее арифметическое чисел больших 10. Массив слов. 20. Найти сколько чисел равно 12h. Массив байт. 21. Заменить все отрицательные числа их модулями. Массив байт. 22. Найти среднее арифметическое положительных чисел. Массив слов. 23. Найти количество чисел меньших 10h. Массив байт. 24. Найти наименьшее среди положительных чисел. Массив слов. 25. Найти наибольшее отрицательное число. Массив байт.

Отправлен: 12.06.2007, 21:47 Вопрос задал: Makes (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Sov Здравствуйте, Makes! Вот решение 2,21 задач. Остальные аналогично Приложение: ;2 st_ segment para stack db 256 dup (?) st_ ends dat segment para public massiv dw -15,15,8,-3,10,9 sum_p dw 0;после завершения цикла в этой переменной сумма положительных sum_otr dw 0;сумма отрицательных dat ends cod segment para public assume cs:cod,ss:st_,ds:dat start: mov ax,dat mov ds,ax mov ax,st_ mov ss,ax mov cx,6 xor si,si label1: mov ax,massiv[si] test ax,8000h jnz otric add sum_p,ax jmp next otric: add sum_otr,ax next: add si,2 loop label1 mov ah,4ch int 21h cod ends end start ;21 st_ segment para stack db 256 dup (?) st_ ends dat segment para public massiv db -33,47,118,-53,93,89 dat ends cod segment para public assume cs:cod,ss:st_,ds:dat start: mov ax,dat mov ds,ax mov ax,st_ mov ss,ax mov cx,6 xor si,si label1: mov ah,massiv[si] test ah,80h jnz otric jmp next otric: neg ah mov massiv[si],ah next: inc si loop label1 mov ah,4ch int 21h cod ends end start

Ответ отправил: Sov (статус: 4-ый класс) Ответ отправлен: 13.06.2007, 09:53 Оценка за ответ: 5

© 2001-2007, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Email: support@rusfaq.ru, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале Версия системы: 4.52 от 02.05.2007
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru