Как записать на языке visual basic (cos пх)?

Math.cos(пх) если имеется в виду vb.net

#код на ruby 2.2.3p173 def zadanie(money)       count = 0       for alice in 1..money - 1             for basil in 1..money - alice - 1                   duremar = money - alice - basil                   if alice - basil > = 1 and alice - duremar > = 1                         p [alice, basil, duremar]                         count += 1                   end             end       end       return count end # # примеры применения p zadanie(17) ответ 37

// pascalabc.net 3.2, сборка 1399 от 08.03.2017 // внимание! если программа не работает, обновите версию! procedure l(s: sequence of integer); begin   s.print(',');   writeln(': s=',s.sum,', п=',s.aggregate(biginteger(,q)-> p*q)) end; begin   var n: =readinteger('n=');   l(range(1,2*n-1,2));   l(range(2,2*n,2));   l(range(3,3*n,3));   l(range(4,4*n,4)) end. пример n= 10 1,3,5,7,9,11,13,15,17,19: s=100, п=654729075 2,4,6,8,10,12,14,16,18,20: s=110, п=3715891200 3,6,9,12,15,18,21,24,27,30: s=165, п=214277011200 4,8,12,16,20,24,28,32,36,40: s=220, п=3805072588800