Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 23.03.2015
Сообщений: 8
1

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

21.04.2015, 22:47. Просмотров 1047. Ответов 1
Метки нет (Все метки)

или может в таком направление проще будет
vb.net
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Sub Main()
        Dim i, j, k, n, s As Integer
        Dim A(n, n) As Integer
        Console.WriteLine("количество матчей")
        n = Console.ReadLine()
        k = 0
        For i = 0 To n
            For j = 0 To n
                A(i, j) = Console.ReadLine()
            Next j
        Next i
        For i = 0 To n
            For j = 0 To n
                If A(i, j) = 2 Then
                    k = k + 1
                End If
                If k > n / 2 Then
                    s = s + 1
                End If
            Next j
        Next i
        Console.WriteLine("количество команд что выиграли больше половины матчей" & " " & s)
    End Sub
 
End Module
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.04.2015, 22:47
Ответы с готовыми решениями:

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

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

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

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

1
COM‐пропагандист
468 / 402 / 100
Регистрация: 18.12.2014
Сообщений: 858
Записей в блоге: 1
22.04.2015, 00:22 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Переменные внутри функции нужно объявлять сразу же в месте использования. Выносить их в отдельный блок или писать в самом начале функции — это антишаблон программирования.
Переменной 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.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.04.2015, 00:22

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

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

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

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

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


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.