Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 16.06.2019
Сообщений: 1
Excel

Дан массив из k символов. Вывести на экран сначала все цифры, входящие в него, а затем все остальные символы

16.06.2020, 19:46. Показов 502. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте, помогите пожалуйста решить задачу.

Дан массив из k символов. Вывести на экран сначала все цифры, входящие в него, а затем все остальные символы, сохраняя при этом взаимное расположение символов в каждой из этих двух групп.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
16.06.2020, 19:46
Ответы с готовыми решениями:

Дан массив из k символов. Вывести на экран сначала все цифры, входящие в него, а затем все остальные символы
Здравствуйте, помогите пожалуйста решить задачу. Дан массив из k символов. Вывести на экран сначала все цифры, входящие в него, а...

Вывести на экран сначала все цифры, входящие в массив символов, а затем все остальные символы
Дан массив из k символов. Вывести на экран сначала все цифры, входящие в него, а затем все остальные символы, сохраняя при этом взаимное...

Вывести на экран сначала все цифры, входящие в массив A, а затем все остальные символы
Дан массив А из k символов. Вывести на экран сначала все цифры, входящие в него, а затем все остальные символы, сохраняя при этом взаимное...

1
 Аватар для Narimanych
2751 / 1725 / 779
Регистрация: 23.03.2015
Сообщений: 5,449
16.06.2020, 22:36
abyssnyl,
Visual Basic
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
Option Base 1
Sub mmm()
L = Array("z", "2", "6", "9", "3", "X", "4", "D")
 
For i = 1 To UBound(L) - 1
   For j = i + 1 To UBound(L)
           If Not IsNumeric(L(i)) And IsNumeric(L(j)) Then
               TMP = L(i)
               L(i) = L(j)
               L(j) = TMP
                  For k = 1 To UBound(L)
                    If Not IsNumeric(L(k)) Then
                        TMP = L(j)
                          For x = j To k + 1 Step -1
                           L(x) = L(x - 1)
                          Next
                        L(k) = TMP
                        Exit For
                    End If
                 Next
              Exit For
          End If
    Next
Next
 
 
Debug.Print Join(L, ",")
 
 
End Sub
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
16.06.2020, 22:36
Помогаю со студенческими работами здесь

Вывести на экран сначала все цифры, входящие в массив, а потом остальные символы
Помогите, пожалуйста, написать сразу с формой: Дан массив из k символов. Вывести на экран сначала все цифры, входящие в него, а затем все...

Вывести на экран сначала все цифры, входящие в текст, а затем все остальные литеры
написать программу на C++ нужно Задан текст, заканчивающийся точкой. Вывести на экран сначала все цифры, входящие в него, а затем все...

Напечатать сначала все цифры, входящие в него, а затем все остальные буквы
Дан текст из 80 букв. Напечатать сначала все цифры, входящие в него, а затем все остальные буквы, сохраняя при этом взаимное расположение...

Преобразовать массив следующим образом: сначала должны стоять цифры, входящие в массив, а затем все остальные символы
помогите пожайлуста с задачей. Задан массив из k символов. Преобразовать массив следующим образом: сначала должны стоять цифры,...

Напечатать сначала все входящие в строку цифры, а затем все остальные литеры
Дана строка. Напечатать сначала все входящие в нее цифры, а затем все остальные литеры, сохраняя при этом взаимное расположение литер в...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
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 На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru