Ответы на вопрос:
Dim r as single, s as string, d, v as string, a() as single dim t as string, z as integer, k as integer, h as integer, g as integer h = rnd * 100 redim a(h) as single for i = 1 to h a(i) = rnd * 1000 s = cstr(a(i))' msgbox s d = split(a(i), ",")' msgbox d(0) v = d(0) z = len(v) s = mid(v, z, 1) if s = "0" then t = t & cstr(a(i)) + " ": g= g+1 next msgbox g msgbox t
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ИНТЕРНЕТ111121.11.2021 01:38
-
Уточка123420.04.2021 04:40
-
русскийязык14922.11.2022 18:01
-
elvinpirimov117.05.2023 18:09
-
MrFoksSuper04.07.2020 18:01
-
PrOFy10029.08.2020 14:29
-
darova120507.02.2020 01:42
-
Your1sad1waifu22.11.2022 07:46
-
rasimfanov19.01.2022 19:42
-
leylakhalimova30.12.2020 17:25
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.