profile
Размещено 4 года назад по предмету Информатика от julia2760

Сижу на информатике) 8 класс. Turbo basic. Тема: массивы. Нужно срочно найти произведение четных отрицательных чисел. или найти количество кратных трем или пяти. 

  1. Ответ на вопрос
    Ответ на вопрос дан HRAshton
    Я в диалектах не очень, но вот вспомнил VB.net :)
     Sub Main()
            Dim a(10) As Integer
            Dim b As Integer = 1
            Dim c As Integer

            Dim R As Random = New Random()
            For i As Integer = 0 To 10
                a(i) = R.Next(12)
                Console.WriteLine("[" + i.ToString() + "] => " + a(i).ToString())
            Next

            For i As Integer = 0 To 10 
               If ((a(i) Mod 2 = 0) And (a(i) < 0)) Then b = b * a(i)
                If ((a(i) Mod 3 = 0) Or (a(i) Mod 5 = 0)) Then c = c + 1
            Next
            Console.WriteLine("Произведение чётных отрицательных: " + b.ToString())
            Console.WriteLine("Кол-во кратных 3 или 5: " + c.ToString())
            Console.Read()
        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) их не спросили

Информация

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