1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7

func Map[F, T any](s []F, f func(F) T) []T {
    r := make([]T, len(s))
    for i, v := range s {
        r[i] = f(v)
    }
    return r
}

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9

func getTransport(tt string) (iTransport, error) {
	if tt == "scooter" {
		return newElectricScooter(), nil
	}
	if tt == "quadcopter" {
		return newQuadcopter(), nil
	}
	return nil, fmt.Errorf("Wrong type")
}

1. 1
2. 2
3. 3

if req.Lang != "" {
	req.Lang = "EN"
}

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22
23. 23
24. 24
25. 25

REM 101.22.25. Постройте алгоритм разложения натуральных чисел на простые множители.
REM В какой форме будут представлены результаты работы этого алгоритма?
        
Dim input As Integer REM Число, вводимое с клавиатуры
Dim min As Integer, max As Integer

input = Int(Val(T1.Text)) REM Ввод данных
If input < 1 Then input = 1
If input > 1000000000 Then input = 1000000000
L3.Text = input & ": "

min = 2 REM "min" - число, которое проверяется, является ли оно делителем числа "max"
max = input REM "max" - число, для которого ищутся делители

Do While min < max
    If max Mod min = 0 Then
        L3.Text = L3.Text & min & " "
        max = max / min
    Else
        If min * min > max Then Exit Do
        min = min + 1
    End If
Loop

L3.Text = L3.Text & max

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22
23. 23
24. 24
25. 25

REM 52.10.18. Напишите алгоритм подсчёта количества "счастливых" автобусных билетов.
REM (Билет называется "счастливым", если сумма первых трёх цифр номера билета равна
REM сумме последних трёх цифр.)

Dim a As Integer, b As Integer, c As Integer
Dim d As Integer, f As Integer, g As Integer
Dim h As Integer REM Число "счастливых" билетов

h = -1 REM Число 000000 в набор автобусных билетов не входит. Его вычитаем.

For a = 0 To 9
    For b = 0 To 9
        For c = 0 To 9
            For d = 0 To 9
                For f = 0 To 9
                    For g = 0 To 9
                        If a + b + c = d + f + g Then h = h + 1
                    Next
                Next
            Next
        Next
    Next
Next

L3.Text = "Число счастливых билетов " & h

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22
23. 23
24. 24
25. 25
26. 26
27. 27
28. 28
29. 29
30. 30
31. 31
32. 32
33. 33
34. 34
35. 35
36. 36
37. 37
38. 38
39. 39
40. 40
41. 41
42. 42
43. 43
44. 44
45. 45
46. 46
47. 47
48. 48
49. 49
50. 50
51. 51
52. 52
53. 53
54. 54
55. 55
56. 56
57. 57
58. 58
59. 59
60. 60
61. 61
62. 62
63. 63
64. 64
65. 65
66. 66
67. 67
68. 68
69. 69
70. 70
71. 71
72. 72
73. 73
74. 74
75. 75
76. 76
77. 77

Public Class F1
    Inherits System.Windows.Forms.Form

    Dim number(3, 30) As Integer REM Массив для хранения 200-значного числа

    Private Sub B1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B1.Click
        REM 52.5.16. Используя алгоритм вычисления функции n! в качестве вспомогательного,
        REM напишите алгоритм вычисления суммы факториалов всех чётных чисел от 2 до 100.

        Dim input As Integer REM Число, вводимое с клавиатуры
        Dim a As Integer, b As Integer REM Временные переменные

        REM Ввод числа с клавиатуры
        L3.Text = ""
        input = Int(Val(T1.Text))
        If input < 0 Then input = 0
        If input > 100 Then input = 100

        For a = 1 To 3
            For b = 1 To 30
                number(a, b) = 0
            Next
        Next

        number(1, 1) = 1
        For a = 1 To input
            multiply(a)

            If a = input Or a Mod 20 = 0 Then
                L3.Text = L3.Text & a & "! = "
                shownumber(1)
                L3.Text = L3.Text & "   "
            End If

        Next
    End Sub

    Sub multiply(ByVal a As Integer) REM Умножение массива "number (1)" на число "a"
        Dim d As Integer, e As Integer REM Временные переменные

        For d = 1 To 30
            number(1, d) = number(1, d) * a
        Next

        REM Перенос остатка, большего 10 млн., в следующий разряд массива
        For d = 1 To 29
            e = number(1, d) \ 10000000
            number(1, d) = number(1, d) Mod 10000000
            number(1, d + 1) = number(1, d + 1) + e
        Next

        If number(1, 30) > 10000000 Then
            For d = 1 To 30
                number(1, d) = 0
            Next
        End If
    End Sub

    Sub shownumber(ByVal a As Integer) REM Вывод на экран массива "number (a)"
        Dim d As Integer, e As Integer, f As Integer REM Временные переменные

        d = 30 REM Верхняя граница отображения числа (элемент не равен нулю)
        While d > 1 And number(a, d) = 0 REM Вычисляем, где кончается ненулевая часть числа
            d = d - 1
        End While

        REM Вывод старших разрядов
        L3.Text = L3.Text & number(a, d)

        REM Вывод младших разрядов
        d = d - 1
        For e = d To 1 Step -1 REM Какое число в массиве выводим (по одной цифре)
            f = number(a, e)
            L3.Text = L3.Text & f \ 1000000 & f \ 100000 Mod 10 & f \ 10000 Mod 10 & f \ 1000 Mod 10 & f \ 100 Mod 10 & f \ 10 Mod 10 & f Mod 10
        Next
    End Sub
End Class

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22

// https://docs.docker.com/engine/api/v1.24/#create-a-container

POST /v1.24/containers/create HTTP/1.1
Content-Type: application/json
Content-Length: 12345

{
       "Hostname": "",
       "Domainname": "",
       "User": "",
       "AttachStdin": false,
       "AttachStdout": true,
       "AttachStderr": true,
       "Tty": false,
       "OpenStdin": false,
       "StdinOnce": false,
       "Env": [
               "FOO=bar",
               "BAZ=quux"
       ],
       ...
}

1. 1
2. 2

func verbMatches(p abac.Policy, a authorizer.Attributes) bool {
	// TODO: match on verb

1. 1
2. 2
3. 3
4. 4
5. 5
6. 6

switch platform {
case "Azure":
	heartbeat = "500"
default:
	heartbeat = "100"
}

1. 1

https://m.vk.com/wall-30666517_1672469