Passing list as an argument in wolfram mathematica -

i have problem. need calculate mean, don't understand why code below doesn't work. read documention , function should accept list , return mean value. doing wrong? why can't pass list function way? how should correct result? thank in advance.

size = 15; list = table[0, {size}]; (*declare list*) count = 0; while[count < size,      list[[count]] =       inversecdf[normaldistribution[0, 1], randomreal[]];      count++ ]   mean[list] (*try mean value*) 

size = 15; list = table[0, {size}];(*declare list*) count = 1; while[count <= size,   list[[count]] = inversecdf[normaldistribution[0, 1], randomreal[]];  count++] mean[list] (*try mean value*) 

alternatively,

size = 15; list = inversecdf[normaldistribution[0, 1], randomreal[{0, 1}, size]] mean[list] 

since inversecdf computes on list, can observed testing symbolic variables:

inversecdf[normaldistribution[0, 1], {a, b}]