1. опишите порядок получения справки по синтаксису языка object pascal в иср delphi.
2. изучите и опишите информацию о компонентах палитры standard по справке delphi.
3. изучите и опишите информацию о числовых типах данных языка object pascal по справке delphi.
4. изучите и опишите информацию об арифметических операциях языка object pascal по справке delphi.
5. изучите и опишите информацию о функции random языка object pascal по справке delphi.
matrix = [[1, 2, 3], [4, 5, 9], [6, 7, 8]]
max_element = 0
for i in range(len(matrix)):
for j in range(len(matrix[i])):
if matrix[i][j] > max_element:
max_element = matrix[i][j]
print(max_element)
Объяснение:
1 строка - матрица
3 строка - ответ, то есть макс. элемент матрицы
4 строка - цикл для перебора массивов
5 строка - цикл для перебора элементов в текущем массиве
6 строка - если элемент матрицы больше нашего ответа...
7 строка - то присваиваем элемент матрицы ответу, получается перебор всех чисел матрицы, и поиск наибольшего элемента
Shared Sub Main(args As String())
Dim n As Integer = Integer.Parse(Console.ReadLine())
Dim p As Single = 1
Dim i As Integer = 1
While i <= n
Dim a As Single = 2 * i
Dim b As Single = 2 * i + 1
p *= a / b
i += 1
End While
Console.WriteLine(p)
End Sub
Объяснение:
Объяснение по стокам:
2. Считать n с консоли
3. p - переменная с результатом
4. i - переменная для цикла
5-10. цикл - основная часть программы
6-7. Числитель и знаменатель соответсвенно.
8. Умножить результат на новую дробь
9. Увеличить счетчик цикла
11. Вывести результат