Lars Gjörling
<6825>
· Text 8942 · w8 · kommentar
1989-06-18 22:56
Ärende: Conventering
Är det verkligen rätt funktioner i förhållande till programexemplet i
inlägg 8939, som du har gett?
Om x=12345, så ger x¤=CVT%¤(x) till resultat att x¤=chr¤(57,48). Den
motsatta konverteringen x=CVT¤%(x¤) fordrar att x¤ har denna
struktur, varvid x uträknas till 57 + 48*256 = 12345. Liknande gäller
för flyttal.
Dessa konverteringsformler är ovärderliga, när man skall ha tal med
i filer av random-access-typ med fast postlängd.
Men i programexemplet matas väl ändå a¤ in från tangentbordet och får
strukturen "12345". Konvertering till x skall då ske med x=val(a¤).
Omvända konverteringen är x¤=num¤(x). Förslag:
10 print"Hur gammal är du?";
11 on error goto 100
12 input a¤
13 x=val(a¤)
14 print"Ok."
15 on error goto
................
90 end
100 print"Nej du, du får inte skriva med bokstäver."
101 goto 10
Omvändningen skulle innebära att raderna 12 och 13 ändras till
input x resp a¤=num¤(x)
(I svarets fjärde rad har du råkat skriva F istället för ¤).