Top rank per group: Difference between revisions

m
No edit summary
Line 2,196:
 
=={{header|IS-BASIC}}==
<lang IS-BASIC> 100 PROGRAM "Employee.bas"(N)
110 LET NR=100:LET X=0
120 STRING NAME$(1 TO NR)*20,ID$(1 TO NR)*6,DEPT$(1 TO NR)*4
Anonymous user