Listing of file='40A' on disk='vmedia/glbr_22.wvd.zip'
# Sector 103, program filename = '40A' 0005 PRINT "TRAFFIC IN ERLANGS" 0010 INPUT T 0020 PRINT "NO. OF EQUIPMENTS" 0030 INPUT N 0040 S=1 0050 FOR I=1TO N 0060 S=S*I 0070 NEXT I 0080 PRINT "P=";T^N/(EXP(T)*S) 0090 PRINT : PRINT "MORE INPUT (1=YES,0=NO)" 0100 INPUT A 0110 IF A=1THEN 5 0120 END