Trunkering i basic2

7 posts in thread

• Sven Wickberg <1384> · Text 212 · w8 · inlagg

  1991-04-06 21:44

  Ärende: Trunkering i basic2

  Häromdagen skulle jag prova en sak och skren en liten programsnutt i basic2 (iofs basic2pc, men det är väl samma?). Programmet ville inte fungera och jag ansträngde mig kolossalt fö r att kolla om jag gjort några termineringsfel eller tankefel. Till slut kom jag på att programmet fungerade perfekt om jag skrev X=INT(RND*Y+1) i stället för X=RND*Y+1 Jag hade ställt mig i heltalsläge och jag har tidigare många gånger provat att RND*Y då trunkeras, dvs decimalerna klipps av när man för över ett decimalvärde i X%. Felet uppträdde någonstans inne i en loop med 275 varv, så jag orkade inte analysera och se vad som hände. Finns det någon som kan basic2 så bra att han geanst kommer på vad det kan ha varit för fel? (Jag tror felet yttrade sig på så vis av RND*Y +1 blev större än Y).
  • Jan-Olof Svensson <6057> · Text 219 · w8 · kommentar

    1991-04-07 19:12

    Ärende: Trunkering i basic2

    Nej, Basic2 trunkerar inte - den avrundar. Du fick nog ett tal som avrundades uppåt. Basic1 för ABC80 trunkerar däremot alltid.
    • Sven Wickberg <1384> · Text 225 · w8 · kommentar

      1991-04-08 19:21

      Ärende: Trunkering i basic2

      Ajdå, ARVRUNDAR! Ja, det är kanske iofs bra, men tänk så mycket en sådan liten ändring ställer till. Nå, jag fick anledning att MYCKET NOGGRANNT gå igenom in kod och jag lärde mig väl en del. Men jag såg sedan att min allra första version skulle ha fungerat om dt inte varit för dettaq fel. Genvägar är senvägar.
  • Benny Löfgren SYSOP <2615> · Text 222 · w8 · kommentar

    1991-04-08 09:53

    Ärende: Trunkering i basic2

    RND*Y+1 kan gott och väl bli större än Y, eftersom RND är definierat som ett tal mellan 0 och 1. 1*Y+1 blir >Y...
    • Lars Gjörling <6825> · Text 226 · w8 · kommentar

      1991-04-08 23:09

      Ärende: Trunkering i basic2

      Ja flyttalet RND*Y + 1 kan mycket väl bli större än Y. Likaså det heltal man får efter avrundning av flyttalet RND*Y + 1. Men det heltal man får efter trunkering av RND*Y + 1 kan inte blir större än Y utan högst lika med Y. Detta beror på att RND inte kan anta värdet 1, utan måste vara mindre. INT(0.9999999999.......*Y + 1) <= Y.
      • Benny Löfgren SYSOP <2615> · Text 229 · w8 · kommentar

        1991-04-09 09:42

        Ärende: Trunkering i basic2

        Du har helt rätt - RND kan inte anta värdet 1. Jag mindes fel. Med andra ord: 0 <= RND < 1
        • Sven Wickberg <1384> · Text 230 · w8 · kommentar

          1991-04-10 16:40

          Ärende: Trunkering i basic2

          Eftersom jag råkade vara upphov till tankekedjan kanske jag ånyo skall tala om artt orsaken var att jag (van från ABC80-tiden) skrev x%=rnd*y+1 i stället för lärobokens x=int(rnd*y+1) I ABC80 trunkeras värdet när det övergår till heltalsvariabeln, i basic2pc avrundas det däremot. Avrundas det uppåt kan resultatet bli 1+1 och då går det åt pipan.