Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Visual Basic .NET Реализация симплекс-метода https://www.cyberforum.ru/ vb-net/ thread1426831.html
Всем доброго времени суток. Требуется помощь с реализацией симплекс-метода на VB.NET. С самим методом знаком, но не слишком сильно. Подскажите, пожалуйста, структуру программы на примере следующей...
Visual Basic .NET Как добавить строки из DataGridView в таблицу Access
Вообщем проблема такая. Есть форма в нем 2 Текстбокса( Высота и Ширина) Нажимаю на кнопку ниже "Расчитать" Программа добавляет в DataGridView 5 строк c расчётами и картинками ,вот код: ...
Visual Basic .NET Как из первой формы TextBox вывести значение во вторую форму в webbrowser https://www.cyberforum.ru/ vb-net/ thread1426057.html
Как мне из Form1 ( из текстбокса 2 ) - Вывести ip адресс для поиска во Form2 в Webbrowser Имеется вот такой вот код: Скопипастил код =) 'код 2 формы WebBrowser1.Navigate("www.infosniper.net")...
Visual Basic .NET Как нарисовать сектор с заливкой? https://www.cyberforum.ru/ vb-net/ thread1426007.html
В учебнике Зиборова предлагается такой вариант в несколько секторов, но он не работает на VB 2010 Sub DrawPieExample(ByVal e As PaintEventArgs) Dim g As Graphics = e.Graphics Dim largeRect...
'ReDim' can only change the rightmost dimension в двухмерних массивах Visual Basic .NET
опять здравствуйте в проге создал кнопки: https://www.cyberforum.ru/vb-net/thread1422742.html каждая кнопка соответствует конкретному дню. объявил 2 интегера: ДН = выбранный день ДНС =...
Visual Basic .NET Почему на родительской форме появляется свернутое окно "MSCTFIME UI"? Здравствуйте. Объясните в чем проблема? Появляется какое-то свернутое окно! Чтобы поймать открытие процесса, запускается из дочерней формы не дочерняя. Родительская со всеми дочерними при этом... https://www.cyberforum.ru/ vb-net/ thread1425568.html
Visual Basic .NET Как можно узнать из файла .m3u название песни и вывести это название в Label? Я делаю свою программку для прослушивания радиостанций (хоть таких и полно - но мне хочется создать что-то свое). Как можно узнать из файла .m3u название песни которая транслируется в данный момент и... https://www.cyberforum.ru/ vb-net/ thread1425468.html Visual Basic .NET Получить массив имен цветов (KnowColor)
Здравствуйте. Мне надо получить массив имен цветов. Dim cname() As String =.GetNames(GetType(KnowColor)) В cname() оказываются все имена. В том числе системные цвета. Мне системные не нужны. ...
Visual Basic .NET Обработка объекта item сообщения Interop.Outlook https://www.cyberforum.ru/ vb-net/ thread1424895.html
Всем привет! Подскажите, пожалуйста, возможно кто-то сталкивался с такой ситуацией: Пытаюсь через Interop.Outlook отловить отправку сообщения и прочесть адрес получателя Класс и метод: Imports...
Visual Basic .NET Отмена удаления строки DataGridView Имеется DataGridView1 без привязок к базам данных. При выделении строки и нажатии клавиши Del - строка удаляется, причём это происходит автоматически без реализации кода. Как мне заблокировать эту... https://www.cyberforum.ru/ vb-net/ thread1424608.html
Для рюкзака с n предметов выбрать такие, чтобы их суммарный вес был не более m кг Visual Basic .NET
Задача о рюкзаке. Нужно для рюкзака с n предметов выбрать такие, чтобы их суммарный вес был не более m кг, а стоимость - наибольшая. Дано вес и стоимость каждого из n предметов.
Visual Basic .NET Выборка из БД значений, соответствующих значению в ComboBox https://www.cyberforum.ru/ vb-net/ thread1424533.html
Всем привет, и снова с вопросом к знатокам: Есть база данных с тремя таблицами, в первой таблице "Цвет ботинок", во второй "Модели обуви" и в третьей "цена", и 2 ComboBox-а, как сделать так чтобы...
COM‐пропагандист
575 / 499 / 113
Регистрация: 18.12.2014
Сообщений: 1,402
Записей в блоге: 4
22.04.2015, 00:22 0

Определить количество футбольных команд, что выиграли больше половины матчей - Visual Basic .NET - Ответ 7512971

22.04.2015, 00:22. Показов 1118. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Переменные внутри функции нужно объявлять сразу же в месте использования. Выносить их в отдельный блок или писать в самом начале функции — это антишаблон программирования.
Переменной k не нужно присваивать 0, так как она уже получает ноль в качестве значения по умолчанию. Лишняя строка кода.
Создаётся массив A(n, n), но фактически будет создан массив A(0, 0), так как переменная n имеет значение по умолчанию 0, а значение ей задаётся уже после создания массива. Очевидная ошибка.
Для целочисленного деления нужно использовать оператор \ вместо /.
Во втором случае цикл можно заменить на For Each, это упростит код.
Можно использовать оператор «x += что‐то» вместо «x = x + что‐то».
VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
    Sub Main()
        Console.WriteLine("количество матчей")
        Dim n As Integer = Console.ReadLine()
        Dim A(n, n) As Integer
        For i As Integer = 0 To n
            For j As Integer = 0 To n
                A(i, j) = Console.ReadLine()
            Next j
        Next i
        Dim k, s As Integer
        For Each i As Integer In A(i, j)
                If i = 2 Then
                    k += 1
                End If
                If k > n \ 2 Then
                    s += 1
                End If
        Next
        Console.WriteLine("количество команд что выиграли больше половины матчей" & " " & s)
    End Sub
Однако я сомневаюсь, что величина s рассчитывается правильно, так как в этом коде она будет всегда накручиваться, как только k станет больше половины n.

Вернуться к обсуждению:
Определить количество футбольных команд, что выиграли больше половины матчей Visual Basic .NET
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.04.2015, 00:22
Готовые ответы и решения:

Расписание матчей футбольных команд
Пишу маленькую игрушку. Вроде футбольная... В общем дается массив с именами (или первичными...

Написать программу результатов матчей футбольных команд (Используя контейнер map)
Помогите пожалуйста, никогда не имела дела с контейнерами((( Задание: футбольные команды (через...

Даны список футбольных команд высшей лиги России и количество очков, набранных каждой командной в чемпионате России. Известно, что нет команд с равным
Даны список футбольных команд высшей лиги России и количество очков, набранных каждой командной в...

Определить, что больше: максимальный элемент левой половины или минимальный элемент правой половины матрицы
Определить что больше максимальный элемент левой половины или минимальный элемент правой половины...

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.04.2015, 00:22

БД футбольных матчей
В MS Access создана БД, в которой хранятся результаты проведенных матчей. Матч проводится путем...

бд футбольных матчей
как в этом месте (которое выделил) сделать так чтобы в "Команду1" и "Команду2" попадали разные...

Прогнозирование футбольных матчей
Ребята, подскажите какие есть методы для прогнозирования футбольных матчей? Из интересного,...

Результаты футбольных матчей.
Даны два массива из 20 однозначных чисел. В первом из них записано количество мячей, забитых...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru