Nested loops for pairwise alignment

I have a dataset of 100 DNA sequences and want to perform pairwise sequence alignment for every two sequences by random sampling them by nested loops. I have tried understanding about the nested loops but I'm all confused about it. Can anyone help me with the looping code in R studio?

Thanks in advance, Harika.