Это одно из исходных аксиоматических понятий
или - объекты у которых есть сходства, можно объеденить во множества(группы)
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
21122
Решение:
8-1=7
7*3=21
21*3=63
63-1=62
62-1=61
Мы- юные солдаты просто класс! Защитим Россию от зараз)))
После преобразований:
A+BC=0
A+CD=0
CD¬A=0
Тогда получаем:
ABCD
0000
0001
0010
0100
0101