Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Visual Basic .NET Реализация симплекс-метода https://www.cyberforum.ru/ vb-net/ thread1426831.html
Всем доброго времени суток. Требуется помощь с реализацией симплекс-метода на VB.NET. С самим методом знаком, но не слишком сильно. Подскажите, пожалуйста, структуру программы на примере следующей задачи. ЗАДАЧА: Целевая функция: P = 2*Х1 + 3*Х2 -> max Ограничения: Х1 + Х2 =< 100; 6X1 + 3X2 =< 360; X1 + 2X2 =< 120;
Visual Basic .NET Как добавить строки из DataGridView в таблицу Access
Вообщем проблема такая. Есть форма в нем 2 Текстбокса( Высота и Ширина) Нажимаю на кнопку ниже "Расчитать" Программа добавляет в DataGridView 5 строк c расчётами и картинками ,вот код: DataGridView1.Rows.Clear() DataGridView1.Rows.Add("TD-01", "Стойка коробки", Val(VIS.Text) + 15, My.Resources._1) DataGridView1.Rows.Add("TD-01", "Импост коробки", Val(SHI.Text)...
Visual Basic .NET Как из первой формы TextBox вывести значение во вторую форму в webbrowser https://www.cyberforum.ru/ vb-net/ thread1426057.html
Как мне из Form1 ( из текстбокса 2 ) - Вывести ip адресс для поиска во Form2 в Webbrowser Имеется вот такой вот код: Скопипастил код =) 'код 2 формы WebBrowser1.Navigate("www.infosniper.net") на таймере: WebBrowser1.Document.Forms("ip_address").All("ip_address").InnerText = TextBoxMAPA.Text ' Чем заменить TextBoxMAPA.Text, использовал MephTextBox2.Text но выдавала ошибку ( компилил класс )...
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 As New Rectangle(20, 20, 200, 100) Dim smallRect As New Rectangle(30, 25, 180, 90) Dim angle As Single = 10.0F For i As Integer = 0 To 8 g.DrawPie(Pens.DarkBlue, largeRect, angle *...
'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 название песни которая транслируется в данный момент и вывести это название в Label , и когда будет играть новая песня - как обновить значение в Label ? https://www.cyberforum.ru/ vb-net/ thread1425468.html Visual Basic .NET Получить массив имен цветов (KnowColor)
Здравствуйте. Мне надо получить массив имен цветов. Dim cname() As String =.GetNames(GetType(KnowColor)) В cname() оказываются все имена. В том числе системные цвета. Мне системные не нужны. Попробовал сделать Dim cname() As String =.GetNames(GetType(KnowColor)).Where(Function(c) Not Color.FromName(c).IsSystemColor) Но не работает. Пожалуйста, подскажите как исправить.
Visual Basic .NET Обработка объекта item сообщения Interop.Outlook https://www.cyberforum.ru/ vb-net/ thread1424895.html
Всем привет! Подскажите, пожалуйста, возможно кто-то сталкивался с такой ситуацией: Пытаюсь через Interop.Outlook отловить отправку сообщения и прочесть адрес получателя Класс и метод: Imports Outlook = Microsoft.Office.Interop.Outlook Public Class MailSend Private WithEvents AppEvent As Outlook.Application End Class Private Sub AppEvent_ItemSend(Item As Object, ByRef Cancel As...
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.cybe
COM‐пропагандист
859 / 768 / 147
Регистрация: 18.12.2014
Сообщений: 2,195
Записей в блоге: 4
22.04.2015, 00:22 0

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

22.04.2015, 00:22. Показов 1315. Ответов 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
22.04.2015, 00:22
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.04.2015, 00:22
Помогаю со студенческими работами здесь

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

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

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

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

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