profile
Размещено 5 лет назад по предмету Информатика от IrinaNevskayа

QBasic
Даны векторы А={а1,...,а15}, В={b1,...,b15}. Переменной Z присвоить значение 1, если вектор А содержит больше чисел, делящихся без остатка на 3, чем вектор В, и значение 0 - в противном случае. Подсчет чисел оформить отдельной подпрограммой.

  1. Ответ на вопрос
    Ответ на вопрос дан DilshodSoliev
    cls
    dim a(15),b(15) as integer
    dim k_a,k_b as integer
    for i=1 to 15
      input a(i)
      input b(i)
    next
    call hisob()
    if k_a>k_b then z=1 else z=0
    print z

    Sub hisob()
    for i=1 to 15
      if a(i) mod 3=0 then k_a=k_a+1
      if b(i) mod 3=0 then k_b=k_b+1
    next
    End Sub
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.