Κυριακή 6 Φεβρουαρίου 2011

2.08 Περιγράψτε την κάθε γραμμή των παρακάτω προγραμμάτων ....

Πρόγραμμα 1:
 { if($1=="makris"){
pl++
sum+=$7
}
}
END {print pl,sum}



Πρόγραμμα 2:
{if(NF>0)
split ($2,p,"-")
print p[3]
}


Πρόγραμμα 3:
{split ($3,m,":")
if(m[1]>21 || m[1]<6) xristes[$1]++
}
END{ for(i in xristes)
print i,xristes[i]
}


Πρόγραμμα 4:
{split ($2,p,"-")
if(p[2]<4) xristes[$1]+=$5
}
END{ for(i in xristes)
print i,xristes[i] }



Πρόγραμμα 5:
{split($2,p,"-")
if(p[2]>6)
split($3,t1,":")
split($4,t2,":")
x1=(t2[1]*60+t2[2])-(t1[1]*60+t1[2])
xristes[$1]+=x1
}
END {for (i in xristes)
print i,xristes[i]
}


Πρόγραμμα 6:
{split($2,m,"-")
if (m[2]>6){
split($3,t1,":")
split($4,t2,":")
x1=(t2[1]*60+t2[2])-(t1[1]*60+t1[2])
xristes[$1]+=x1
}
}
END {for(I in xristes)
print I,xristes[I]
}


Πρόγραμμα 7:
{if($1=="makris"){
split($2,m,"-")
split($3,t1,":")
split($4,t2,":")
x1=(t2[1]*60+t2[2])-(t1[1]*60+t1[2])
xristes[m[2]]+=x1
}
}
END {for(i=1;i<=12;i++)
print i,xristes[i]
}

Δεν υπάρχουν σχόλια:

Δημοσίευση σχολίου