veraway140
31.12.2021 04:39

50 !
по схеме составить программу для visual basic for application (vba).
заранее огромное ​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Lololiplolpjvfhsbf
13.12.2022 13:10

564

Объяснение:

* - любое количество любых символов

? - один любой символ

"cam1_*.webp выдал 5320 файлов" - значит в каталоге присутствует 5320 файлов  cam1_.webp ( - порядковый номер от 0000 до 5319)

"cam2_*.webp выдал 434 файла."  - значит в каталоге присутствует 434 файлов  cam2_xxx.webp ( - порядковый номер от 000 до 433)

cam?_?3*.webp - файлы cam1_x3xx.webp и cam2_x3x.webp

Т.е надо посчитать количество чисел от 0 до 5319 где количество сотен равно 3 и количество чисел 0 до 432 где количество десятков равно 3.

1) Количество чисел: 5*100 (от 0300 до 0399 ... и 4300 до 4399) + 20 (5300 до 5319)  = 520

2) 4*10 (030 до 039 ... 330 до 339) + 4 (430 431 432 433) = 44

Итого: 520 + 44 = 564

Не забывайте нажать " ", поставить оценку и, если ответ удовлетворил, то выберите его как "Лучший"

Бодрого настроения и добра!

Успехов в учебе

0,0(0 оценок)
Ответ:
alexmad2001
08.02.2020 17:13

Написал на том, что было под рукой: 1C

Если Квартира > ЭтажейВДоме * КвартирНаЭтаже Тогда  

 Сообщить("Нет такой квартиры в доме, мало этажей!");

ИначеЕсли Квартира <= КвартирНаЭтаже Тогда  

 Сообщить("Живет на первом этаже");

Иначе

 ЖиветНа = Цел(Квартира / КвартирНаЭтаже);

 ОстатокЭт = Квартира%КвартирНаЭтаже;

 Если ОстатокЭт>0 Тогда  //

  ЖиветНа = ЖиветНа+1;

 КонецЕсли;

 Если ЖиветНа%2=0 И ЖиветНа=ЭтажейВДоме Тогда // это четный и последний

  ВыходитьНа = ЖиветНа-1;

 ИначеЕсли ЖиветНа%2=0 Тогда // четный в НЕчетный этаж

  ВыходитьНа = ЖиветНа+1;

 Иначе

  ВыходитьНа = ЖиветНа;

 КонецЕсли;

 Сообщить(" Выйдет на: "+ВыходитьНа);

КонецЕсли;

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота