Вводится последовательность из N чисел. Найти, сколько в ней нулей
10-11 класс
|
и их порядковые номера. Basic напишите программный код, пожалуйста
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
Другие вопросы из категории
сервер по каждому запросу.
Для обозначения логической операции "ИЛИ" в запросе исполльзуется символ |, а для логической операции "И" - &
А) продажа | принтеры
Б) Сервис | продажа | принтеры | сканеры
В) принтеры & сканеры & продажа & сервис
Г) (продажа | принтеры) & (сервис | сканеры)
Читайте также
нарисовать схему алгоритма в вводимой последовательности из N чисел найти количество чисел больших 7
чисел найти количество элементов равных 3. 3)В массиве из 8 целых найти номер массива с наибольшим значением. 4)В массиве из 12 целых чисел найти количество и сумму элементов, расположенных до максимального элемента. 5)Для массива из 15 вещественных подсчитать количество элементов массива меньших суммы первого и последнего элементов массива.
наименьшее число среди чётных элементов последовательности.
произвольных массивах, состоящих из 1 числа, из 5 чисел, из 10 чисел.