Есть ответ 👍

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

153
191
Посмотреть ответы 2

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

nakiba321
4,4(60 оценок)

Vb. dim counta as integer dim countb as integer        dim x as integer        dim a as integer        dim b as integer        a = inputbox("введите а")        b = inputbox("введите b")         for x = 1 to len(cstr(a))             if cint(mid(cstr(a), x, 1)) mod 2 = 0 then counta += 1         next         for x = 1 to len(cstr(b))             if cint(mid(cstr(b), x, 1)) mod 2 = 0 then countb += 1 '   c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535         next         if counta = countb then msgbox("количество четных цифр в двух числах равно")         if counta > countb then msgbox("в первом числе количество четных цифр больше") else msgbox("во втором числе количество четных цифр больше")

Программа на языке pascal abc имеет следующий вид: program имя программы; раздел подключения модулей  раздел описаний  begin  операторы  end. первая строка называется заголовком программы и не является обязательной. раздел подключения модулей начинается со служебного слова uses, за которым следует список имен модулей, перечисляемых через запятую. раздел описаний может включать разделы описания переменных, констант, типов, процедур и функций, которые следуют друг за другом в произвольном порядке. раздел подключения модулей и раздел описаний могут отсутствовать. операторы отделяются один от другого символом "точка с запятой"

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

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

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

Caktus Image

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

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

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

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

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

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

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

GTP TOP NEWS