Необходимо написать программу, которая сортирует выпитый массив в порядке возрастания от массива номер один (быстрой сортировкой).

Sub Z()
Dim k As Integer
Dim m As Integer
Dim p As Single
Dim i As Integer
Dim j As Integer
Dim n As Integer
Dim x As Integer
k = InputBox("Количество округов")
m = InputBox("Количество партий")
p = InputBox("Порог явки изберателей (в %)")
s = "Выборы состоялись в округах: "
For i = 1 To k
    For j = 1 To m
        x = InputBox("Округ " & i & ". Голосов за партию №" & j)
        n = n + x
    Next j
    x = InputBox("Округ " & i & ". Не голосовало")
    If (n / (n + x) * 100) > p Then s = s & i & "; "
    n = 0
Next i
MsgBox (s)
End Sub

Вычислительная техника широко используется в современных системах обработки информации, для быстрого и точного определения координат судов, самолётов, космических объектов и т.п. Особенной областью применения вычислительной техники являются информационные поисковые системы, обеспечивающие механизацию библиотечных и библиографических работ и ликвидации больших справочных картотек. Быстро развивающейся сферой использования вычислительной техники является также работа банков, сберегательных касс и других финансовых учреждений, где применение ЦВМ позволяет централизованно реализовывать все расчётные операции.

Современный научно-технический прогресс характеризуется прежде всего не только высокой производительностью и научной организацией труда, но и широкой механизацией и автоматизацией умственной деятельности человека. Алгоритмизация умственной деятельности человека потребовала интенсивной разработки новых разделов математики, особенно математического моделирования, логики, лингвистики и психологии, создания специальных математических методов анализа, физических, биологических и социальных процессов, математическое исследование которых было ранее невозможно.

На opt-hardware.ru Вы найдете много полезной и исчерпывающей информации о закупках, торгах и тендерах на средства вычислительной техники!

Средства связи

Средства связи – это технические и иные средства, с которых решаются задачи передачи, приема, обработки и хранения информации. Средства связи, в зависимости от принципов и сфер деятельности, бывают радиорелейные, тропосферные, проводные, космические, оптические, лазерные и гидроакустические. Так же средства связи разделяют по характеру передаваемой информации на телефонные, телеграфные, телекодовые, телевизионные факсимальные, видеотелефонные, сигнальные и фельдъегерско-почтовые.

Связь играет немаловажную роль в производственно-хозяйственной деятельности общества и управлении государством, вооружёнными силами и всеми видами транспорта, а также в удовлетворении культурно-бытовых надобностей населения. Недостаточный уровень развития средств связи ведёт к уменьшению темпов экономического развития, роста национального дохода и уровня жизни населения.

На b2b-connection.ru Вы найдете много полезной и исчерпывающей информации о закупках, торгах и тендерах на средства связи!

Автоматизация

Автоматизация – применение машин, машинной техники и технологии в производстве с полным или частичным устранением человеческого труда. Автоматизация производства предполагает устранение тяжелого физического труда рабочих, перекладывая задачи на автоматизированное оборудование, функционирующего по принципу саморегуляции. Автоматизация управления – применение компьютерных средств для обработки и передачи информации в управлении производственными процессами. Автоматизация повышает производительность.