Вводится последовательность из n чисел. найти, сколько в ней нулей и их порядковые номера. basic напишите программный код,

Boba35 Boba35    2   09.06.2019 00:30    2

Ответы
вап27 вап27  01.10.2020 22:38
Visual Basic? Их много, вот, например, на VB.NET

    Sub Main()
        Dim N As UInteger
        Dim Num As Integer
        Dim A As String = String.Empty
        N = Integer.Parse(Console.ReadLine())
        For i As UInteger = 1 To N
            Console.Write(i.ToString() + " ")
            Num = Integer.Parse(Console.ReadLine())
            If Num = 0 Then
                A += i.ToString()
            End If
        Next
        Console.WriteLine()
        Console.WriteLine()
        Console.WriteLine(A.Length)
        Console.WriteLine()
        For Each i As Char In A
            Console.WriteLine(i)
        Next
        Console.ReadKey()
    End Sub
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика