Регистрация Спросить otvet5GPT
LiraReeman
08.05.2023 14:21
Информатика
Есть ответ 👍

Vba! переделать алгоритм с цикла по параметру на цикл с пост или с предусловием, сколько можно купить быков,коров , телят, если за b(быков)-10 руб k(коров)-5 руб, t(телят)-0,5 руб, если есть 100 рублей, нужно купить 100 голов скота. sub slot() dim c as double dim c1 as double dim c2 as double dim c3 as double dim z as integer dim b as integer dim t as integer dim n as integer n = 100 ' nado golov c = 100 ' vsego deneg c1 = 10 ' za bika c2 = 5 'za korovy c3 = 0.5 'za telenka for z = 0 to c / c1 for b = 0 to c / c2 for t = 0 to c / c3 if z + b + t = n then if z * c1 + b * c2 + t * c3 = c then msgbox ("bikov: " & z & "korov: " & b & "teliat: " & t) end if end if next t next b next z end sub

162
275
Посмотреть ответы 2

Ответы на вопрос:

NarutoUzumaki1999
NarutoUzumaki1999
4,5(91 оценок)
Иc постусловием, и с предусловием. sub slot()       dim c as double       dim c1 as double       dim c2 as double       dim c3 as double       dim z as integer       dim b as integer       dim t as integer       dim n as integer       n = 100 ' nado golov       c = 100 ' vsego deneg       c1 = 10 ' za bika       c2 = 5 'za korovy       c3 = 0.5 'za telenka       z = 0       do               b = 0               do while b < = c / c2                       t = 0                       do while t < = c / c3                               if z + b + t = n then                                       if z * c1 + b * c2 + t * c3 = c then                                               msgbox ("bikov: " & z & "korov: " & b & "teliat: " & t)                                       end if                               end if                               t = t + 1                       loop                       b = b + 1               loop               z = z + 1       loop until z > c / c1 end sub
Зимаа1
Зимаа1
4,8(93 оценок)
Размер цифрового моноаудиофайла измеряется по формуле:       a = d*t*i, где d – частота дискретизации (гц), t – время звучания или записи звука, i - разрядность регистра (разрешение или глубина кодирования звука). 750 кбайт = 750*1024 байт = 750*1024*8 бит 32 кгц = 32000 гц i = 750*1024*8 / (32000*12) = 16 бит ответ: 16 бит

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS