Bodování rychlobruslařských čtyřbojů se provádí součtem časů pro průměrné pětistovky ze všech 4 tratí. U čtyřboje mužů se čas na 5000 m dělí deseti, na 1500 m se dělí 3, a na 10 km se dělí 20.
U žen se čas na 1000 m dělí 2, na 3000 m šesti. U sprinterského čtyřboje se opakuje dvojice 500 a 1000 m, druhý čas se dělí 2.
Použijeme programy:
Sprinterský 4boj – společný pro muže i ženy
PRINT "první den"
INPUT "t500 (sek)", b: GOSUB d: b = t
INPUT "t1000 (min.sek)", t: GOSUB s: b = b + t / 2: GOSUB d
PRINT "druhý den"
INPUT "t500 (sek)", t: b = b + t: GOSUB d
INPUT "t1000 (min.sek)", t: GOSUB s: b = b + t / 2: GOSUB d
END
s:
t = 60 * INT(t) + 100 * (t – INT(t)): RETURN
d:
PRINT "body=", b: RETURN
Čtyřboj muži
PRINT "první den"
INPUT "t500 (sek)", b: GOSUB d
INPUT "t5000 (min.sek)", t: GOSUB s: b = b + t / 10: GOSUB d
PRINT "druhý den"
INPUT "t1500 (min.sek)", t: GOSUB s: b = b + t / 3: GOSUB d
INPUT "t10000 (min.sek)", t: GOSUB s: b = b + t / 20: GOSUB d
END
s:
t = 60 * INT(t) + 100 * (t – INT(t)): RETURN
d:
PRINT "body=", b: RETURN
Čtyřboj ženy
PRINT "první den"
INPUT "t500 (sek)", b: GOSUB d
INPUT "t1500 (min.sek)", t: GOSUB s: b = b + t / 3: GOSUB d
PRINT "druhý den"
INPUT "t1000 (min.sek)", t: GOSUB s: b = b + t / 2: GOSUB d
INPUT "t3000 (min.sek)", t: GOSUB s: b = b + t / 6: GOSUB d
END
s:
t = 60 * INT(t) + 100 * (t – INT(t)): RETURN
d:
PRINT "body=", b: RETURN
Technické řešení této výukové pomůcky je spolufinancováno Evropským sociálním fondem a státním rozpočtem České republiky.