type Man = {Name:string; Age:int}

​

let people = [{ Name = "Саша"; Age = 19 }

              { Name = "Витя"; Age = 80 }

              { Name = "Коля"; Age = 11 }]

​

let age = [20; 30 ; 45]

​

List.map2(fun x y -> { x with Age = y} ) people age

|> List.iter(fun x -> printfn "%s [%i]" x.Name x.Age)