Як потрібно записувати команди розгалуження, у яких використовуються значення властивості Checked для прапорця?

Конечно, я помогу вам с написанием программ на языке Visual Basic для решения этих задач.

1. Дано три числа A, B, C. Необходимо вывести все нечетные числа.

Для начала, нам нужно определить, какие из трех чисел являются нечетными. Мы можем использовать оператор Mod, который возвращает остаток от деления одного числа на другое. Если остаток равен нулю, то это число четное, иначе - нечетное.

Вот код программы на Visual Basic, который реализует это:

```vb
Sub Main()
Dim A As Integer
Dim B As Integer
Dim C As Integer
Dim oddNumbers As String

' Ввод значений для переменных A, B и C
Console.Write("Введите значение для A: ")
A = Console.ReadLine()
Console.Write("Введите значение для B: ")
B = Console.ReadLine()
Console.Write("Введите значение для C: ")
C = Console.ReadLine()

' Проверка числа A на нечетность и добавление его к строке oddNumbers, если оно нечетное
If A Mod 2 <> 0 Then
oddNumbers = oddNumbers & A & " "
End If

' Проверка числа B на нечетность и добавление его к строке oddNumbers, если оно нечетное
If B Mod 2 <> 0 Then
oddNumbers = oddNumbers & B & " "
End If

' Проверка числа C на нечетность и добавление его к строке oddNumbers, если оно нечетное
If C Mod 2 <> 0 Then
oddNumbers = oddNumbers & C & " "
End If

' Вывод результата
Console.WriteLine("Нечетные числа: " & oddNumbers)

Console.ReadLine()
End Sub
```

При запуске программы она попросит вас ввести значения для переменных A, B и C. После этого она выведет все нечетные числа из трех введенных.

2. Дано три числа A, B, C. Необходимо вывести наибольшее из этих трех чисел. При этом условие задачи гласит, что все числа являются разными.

Для решения этой задачи мы можем использовать условные операторы If и ElseIf для сравнения трех чисел и нахождения наибольшего из них.

Вот код программы на Visual Basic, который реализует это:

```vb
Sub Main()
Dim A As Integer
Dim B As Integer
Dim C As Integer
Dim maxNumber As Integer

' Ввод значений для переменных A, B и C
Console.Write("Введите значение для A: ")
A = Console.ReadLine()
Console.Write("Введите значение для B: ")
B = Console.ReadLine()
Console.Write("Введите значение для C: ")
C = Console.ReadLine()

' Проверка, какое число из трех наибольшее
If A > B And A > C Then
maxNumber = A
ElseIf B > A And B > C Then
maxNumber = B
Else
maxNumber = C
End If

' Вывод результата
Console.WriteLine("Наибольшее число: " & maxNumber)

Console.ReadLine()
End Sub
```

При запуске программы она попросит вас ввести значения для переменных A, B и C. После этого она выведет наибольшее из трех введенных. Обратите внимание, что данная программа работает только при условии, что все три числа разные.

Надеюсь, эти программы на Visual Basic помогут вам решить ваши задачи. Если у вас возникнут еще вопросы, не стесняйтесь задавать.

Машинно-ориентированные языки программирования предназначены для взаимодействия с компьютером на более низком уровне, ближе к его "языку" - машинному коду. Они позволяют программистам напрямую управлять железом и процессором компьютера.

Среди перечисленных языков программирования машинно-ориентированным является язык Assembler (3). Assembler – это низкоуровневый язык программирования, где команды написаны практически на машинном коде. Он позволяет программисту управлять прямо такими серверами и программами на реализации операционной системы.

Cobol (1), Basic (2) и Fortran (4) - это языки высокого уровня программирования. В отличие от машинно-ориентированных языков, они предоставляют более абстрактный и удобный для программиста синтаксис и возможности. Однако, они работают на более высоком уровне абстракции и используют компилятор или интерпретатор для перевода кода на машинный язык, который будет понятен компьютеру.

Итак, чтобы ответить на твой вопрос, "Какой из перечисленных языков программирования является машинно-ориентированным?", правильный ответ будет язык Assembler (3). Он предоставляет программисту возможность работать на более низком уровне компьютера и управлять им прямо на уровне его машинного языка.