Robusta realtidssystem

Ur H PgmvSäk (Förstudieutgåva)

Safety-Critical Computer Systems
Kap:1,2,3,4,5,6,7,8, 9,10,14

Övningstentan (hela) Zip

Ett litet "robust" tips för din räknare: (X ersättes givetvis med passande siffra)

X00 "MEANTIME TILL P"
X10 USING "##.####"
X20 INPUT "T=";T
X30 INPUT "M=";M
X40 N1= MDF((EXP (-T/M)))
X50 N= 1 - (EXP (-T/M))
X60 PRINT "INTR EJ........";N1
X70 PRINT "INTR.............";N
X80 GOTO X30

Förklaring:
I runmod ropar du på programmet genom
RUN X00
Du ombeds skriva in T, (tryck därefter Enter)
Du ombeds skriva in M, (tryck därefter Enter)
Du får formaterat resultat,typ:
INTR EJ...............0.5353
INTR.....................0.4647
Du ombeds skriva in nästa M, (tryck därefter Enter)
OSV....