ejemplo de manejo de datos en matrices...

dim Empleados(5,5) as string
for i=1 to 5
n=readline()
s=readline()
t=readline()
Empleados(i,1)=n
Empleados(i,2)=s
empleados(i,3)=t
next i
for i=1 to 5
 write (empleados(i,1)) & " "
 write(Empleados(i,2)) & " "
 write(Empleados(i,3)) & " "
 write (Val(Empleados(i,2))/30*Empleados(i,3))
next i