Az Eszterházy Károly Tanárképző Főiskola Tudományos Közleményei. 1989. 19/6. (Acta Academiae Paedagogicae Agriensis : Nova series ; Tom. 19)

Budai László: Egyszerű hőöszzegmérés

- 613 Ezután a gép kérdezi a napi hőmérsékleti minimumot és a legnagyobb hőingadozást. Ezek hiányában a hőingadozást 5 °C pontossággal a terepviszonyokat is figyelembe véve a meteorológiai állomások odavonatkozó adatai alapján vagy a meteorológiai térképek alapján becsüljük. A kapott többletérték levonása után eredményként jelentkezik a valódi hőösszeg. 2. program 10 PRINT " M00S5ZEGSZAMITAS " 20 INPUT " 'A' együttható: ";A 30 PRINT "A= ";A 40 INPUT " 'B

1 együttható: ";B 50 PRINT "B= " ;B 60 INPUT " ÖSSZES PAROLGAS /gr./ ";S 70 PRINT "PAROLGAS: ";S;" gr." 80 INPUT "NAPOK SZAMA: ";N 90 PRINT "A PAROLGAS EGYENLETE:" 100 PRINT:PRINT" LN /p/ = ";A; -B;" /í.absz." 110 PRINT:PRINT" A KORRIGÁLATLAN IDOSSZEG:" 120 PRINT:PRINT 130 PRINT INT/N * /ß/ A/ -LN /S/N// -273.15//;" C-fok 140 LET T=0:LET P=0:LET 3=0:LET C=0: LET V=0:LET K=0:LET Y=0 150 PRINT "RANDOM H0ÜSSZEGK0RREKCI0" 160 LET Z=1 170 INPUT "HÜMERSEKLETI MINIMUM: ";M 100 INPUT "H0INGAD0ZAS MAX. ";I 190 PRINT "HOMERSEKLETI MIN.: ";M;" C-fok": PRINT "HOINGADOZAS: ";I;" C-fok" 200 LET H=I * RND +M