Mode:
Duration:
1
2
3
4
5
6
7
Module Program
Sub Main()
Dim numbers = Enumerable.Range(1,10).ToArray()
Dim squares = numbers.Where(Function(n) n Mod 2 = 0).Select(Function(n) n * n).ToArray()
Console.WriteLine(String.Join(",", squares))
End Sub
End ModuleCoding works best on desktop or with an external keyboard.