Форум программистов, компьютерный форум, киберфорум
Assembler: DOS/Real Mode/16-bits
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
*CRONOS*

Дан массив Х[1..М]. Вычислить сумму элементов, удовлетворяющих условию A<=X[i]<=B.

16.12.2010, 16:39. Показов 1141. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
1. Дан массив Х[1..М]. Вычислить сумму элементов, удовлетворяющих условию A<=X[i]<=B. Используйте адресацию по базе с индексированием.
2.Дана последовательность символов Sl,...,Sn, среди которых есть двоеточие. Получить все символы, расположенные до первого двоеточия включительно. Строку символов ввести с клавиатуры, результат вывести на экран.
Отпишитесь плз, кто сможет помочь.
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
16.12.2010, 16:39
Ответы с готовыми решениями:

Дан одномерный массив. Определить номера элементов массива,удовлетворяющих условию A<Y(I)<B
Дан одномерный массив. Определить номера элементов массива,удовлетворяющих условию A&lt;Y(I)&lt;B. помогите пожалуйста! Зарание спасибо!

Вычислить сумму элементов файла, удовлетворяющих условию
Ввести с клавиатуры целое число. 1. Если число находится в интервале от 1 до 10, то посчитать сколько букв r, k, t в строке. 2. Если...

Вычислить сумму элементов массива, удовлетворяющих условию
Для целочисленного массива A(N) вычислить сумму тех элементов, которые удовлетворяют условию |ai| &lt; i^2

2
 Аватар для Goodwin98
2537 / 833 / 10
Регистрация: 31.05.2009
Сообщений: 1,668
16.12.2010, 17:11
Не вижу ваших попыток решения.
0
0 / 0 / 0
Регистрация: 13.01.2013
Сообщений: 6
13.01.2013, 13:46
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
print     MACRO     Mess
          lea       DX,Mess
          mov       AH,09h
          int       21h
          ENDM
vvod      MACRO     N
          lea       DX,N
          mov       AH,0Ah
          int       21h
          ENDM
print_sim MACRO     Sim
          mov       DX,Sim
          mov       AH,06h
          int       21h
          ENDM
prin_sim1 MACRO     sim
          mov       DL,Sim
          mov       AH,06h
          int       21h
          ENDM
ten   MACRO     xx,n
          LOCAL     m1,exit
          cmp       n,0
          je        exit
          push      AX
          push      CX
          mov       CX,n
          mov       AX,xx
       m1:
          mov       DX,10
          mul       DX
          loop      m1
          mov       xx,AX
          pop       CX
          pop       AX
     exit:
          ENDM
asci_deg  MACRO     xx,str,len
          LOCAL     m1
          mov       AX,0
          mov       BX,0
          mov       SI,0
          mov       CH,0
          mov       CL,len
          mov       DI,CX
          dec       DI
       m1:
          mov       BL,str[SI]
          mov       BH,0
          sub       BX,30h
          ten       BX,DI
          add       AX,BX
          inc       SI
          dec       DI
          loop      m1
          mov       xx,AX
          ENDM
 
my_stack         SEGMENT STACK 'Stack'
                  DW 64 DUP (?)
my_stack         ENDS
 
data                  SEGMENT
mas                 db 10 dup(?)
Temp1               db 3,?
Temp                db 2 dup(?)
mes1                db 10,13,'Введите $'
mes2                db '-й элемент массива=$'
mes3                db 10,13,'Введите число элементов массива=$'
mes4                db 10,13,'Введите число A=$'
mes5                db 10,13,'Введите число B=$'
mes6                db 10,13,'Сумма элементов удовлетворяющих условию=$'
MM                  db 3,?
M1                  db 2 dup(?)
AA                  db 3,?
A1                  db 2 dup(?)
BB                  db 3,?
B1                  db 2 dup(?)
M                   dw 1 dup(?)
A                   dw 1 dup(?)
B                   dw 1 dup(?)
Ent                 db '',0Ah,0Dh,'$'
Tm                  dw 1 dup(?)
Tm1                 dw 1 dup(?)
Tm2                 dw 1 dup(?)
Sum                 dw 1 dup(?)
data                  ends
 
text  SEGMENT
      assume CS:text, DS:data, SS:my_stack
main proc     far
       push   DS
       xor       AX,AX
       push    AX
       mov     AX,data
       mov     DS,AX
 
       print     Mes3
       Vvod      MM
       asci_deg  M,M1,[MM]+1
       mov       CX,M
       mov       SI,0
       mov       BX,0
    N:
       print     Mes1
       add       SI,31h
       print_sim SI
       sub       SI,31h
       print     Mes2
       Vvod      Temp1
       mov       Tm,SI
       mov       Tm1,CX
       asci_deg  Tm2,Temp,[Temp1]+1
       mov       AX,Tm2
       mov       SI,Tm
       mov       Mas[SI],AL
       mov       CX,Tm1
       inc       SI
    loop  N
       print     Mes4
       Vvod      AA
       asci_deg  A,A1,[AA]+1
       print     Mes5
       Vvod      BB
       asci_deg  B,B1,[BB]+1
       mov       SI,0
       mov       CX,M
       mov       DX,0
       mov       AX,0
    N1:
       mov       AL,Mas[SI]
       mov       BX,A
       cmp       AX,BX
       jge       E
       jmp       Exit
     E:
       mov       BX,B
       cmp       AX,B
       jle       E1
       jmp       Exit
     E1:
       add       DX,AX
     Exit:
       inc       Si
    loop  N1
       mov       Sum,DX
       print     Mes6
       mov       DX,Sum
       mov       AX,DX
       cmp       AL,10
       jge       D
       jmp       D1
    D:
       mov       BL,10
       div       BL
       mov       BX,AX
       mov       AL,BH
       mov       AH,BL
    D1:
       add       AL,30h
       add       AH,30h
       mov       BH,AL
       mov       BL,AH
       prin_sim1 BL
       prin_sim1 BH
       print     Ent
;-------------------------
      ret
main endp
text   ends
          end main
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
13.01.2013, 13:46
Помогаю со студенческими работами здесь

Вычислить сумму всех элементов матрицы, удовлетворяющих условию
Задача 3 Дана матрица: A=\left| \begin{array}{rrr}2.8 &amp; 3.6&amp; -1.7\\ 0.28 &amp; 3.12 &amp; 1.4\\ 0.67 &amp; 5.4 &amp; 8.2\end{array}\right| ...

в массиве вычислить количество и сумму элементов, удовлетворяющих условию
задан массив(n=20) x{-20$15$3;-9;7;-6;14;-13;6;-7;9;-12;5;7;-2;17;10;-1;16;-3}. в заданном массиве вычислить количество и сумму элементов,...

Вычислить сумму и количество элементов массива , удовлетворяющих условию 0<=x(i)<=1
x(100) вычислить сумму и количество элементов массива , удовлетворяющих условию 0&lt;=x(i)&lt;=1

В массиве вычислить количество и сумму элементов, удовлетворяющих условию
задан массив(n=20) x{-20$15$3;-9;7;-6;14;-13;6;-7;9;-12;5;7;-2;17;10;-1;16;-3}. в заданном массиве вычислить количество и сумму элементов,...

Вычислить сумму и количество элементов массива, удовлетворяющих условию
Вычислить сумму и количество элементов массива X,удовлетворяющих условию 0&lt;=X&lt;=1. Массив X. Помогите пожалуйста, где я ошибки...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
BOINC: 22 года — и всё ещё работает
Programma_Boinc 12.03.2026
BOINC: 22 года — и всё ещё работает Дэвид Андерсон написал ретроспективу. Кратко: в 2001 году он ушёл из United Devices, где был CTO, и за несколько месяцев написал ядро BOINC — клиент, сервер,. . .
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru