let 
   hello = if true 
      then 10 
      else 5 
in     
   hello

= hello = if true then 10 else 5

let
    fullfilepath = fnGetParameter("File Path fplreview"),
    tour1 = fnGetParameter("tour"),
    tour_max = if tour1 <= 31 then 7 else 38 - tour1,
    Источник = Csv.Document(File.Contents(fullfilepath),[Delimiter=",", Columns=22, Encoding=65001, QuoteStyle=QuoteStyle.None]),
    #"Повышенные заголовки" = Table.PromoteHeaders(Источник, [PromoteAllScalars=true]),
    #"Удаленные столбцы" = Table.RemoveColumns(#"Повышенные заголовки",{"SV", "ID"}),
    #"Переименованные столбцы" = Table.RenameColumns(
        #"Удаленные столбцы",
        {   {"BV", "Cost"},
            List.Generate(
                ()=> [Index=0],
                each [Index] <= tour_max,
                each [Index = [Index]+1],
                each Table.ColumnNames(#"Удаленные столбцы"){4+[Index]*2},"Min"&Text.From(tour1+[Index])
            ),
            List.Generate(
                ()=> [Index=0],
                each [Index] <= tour_max,
                each [Index = [Index]+1],
                each Table.ColumnNames(#"Удаленные столбцы"){5+[Index]*2},"Pts"&Text.From(tour1+[Index])
            )
        }
    )
in    
    #"Переименованные столбцы"

Function ВПР2(SearchValue As Variant, Table As Range, ResultColumnNum As Integer)
Dim i As Integer
For i = 1 To Table.Rows.Count
    If Table.Cells(i, 1) = SearchValue Then
        ВПР2 = Table.Cells(i, ResultColumnNum)
    End If
Next i
End Function