qse/ase/cmd/awk/t1.awk
2008-03-21 03:49:53 +00:00

22 lines
186 B
Awk

function sum(i, k, y)
{
y = 0;
for (k = i; k; k = k - 1)
{
y = y + k;
}
return y;
y = 10;
return y;
}
BEGIN {
/*s = sum(10000000);*/
s = sum (100);
print s;
return s;
}