. *****/¢*/ */¢*/ */¢*/ */¢******/¢*//// ***/ ****/ *****/¢*/ */ */ *//// //*//¢*/ */ */ ***/ */¢*/ */ */ ///*/ */¢*/ /***/ ****/ */¢/ /// //// /¢¢¢¢Ik ontving de volgende vraag:¢¢Ik typ het volgende programma in en het werk niet zoals ik wil:¢¢10 A=1¢20 FOR P=1 TO 100 STEP A¢30 A=A+1¢40 ?P¢50 NEXT P¢¢Het is de bedoeling dat de STEP steeds een stapje groter wordt. Hoe pak ik dat aan???¢¢¢¢Wel Rene,¢¢Allereerst bedankt voor de positieve brief. Ik denk niet dat het zal lukken met een for-next loop. De computer kijkt na de step grootte op het moment dat hij op regel 20 komt. Daarna niet meer!! Je kunt A dus wel veranderen, maar de step blijft het zelfde. Ook de waarden voor en na TO kun je tussendoor aanpassen, maar ook dat zal de computer negeren. De variabele krijgt wel een andere waarde, maar de begin- en eind waarde van de lus blijft zoals hij is.¢¢Probeer het volgende programma een s om het probleem op te lossen:¢¢10 A=1:P=1¢20 REPEAT¢30 A=A+1:P=P+A¢40 ?P¢50 UNTIL P=>100¢¢Rene:¢¢Ik heb ook nog een programma inelkaar gezet dat prima funktioneert. Maar als ik het ga compileren, krijg ik een error. Hoe voorkom ik dit.¢¢¢John:¢¢Als het goed is verteld de compiler aan jou in welke regel de fout zit. De compiler is veel kritischer dan Turbo-basic. Turbo-basic geeft pas een error als hij iets tegen komt dat hij niet kan uitvoeren. De compiler kijkt eerst of alle lussen kloppen. Bij elke FOR mag maar 1 NEXT zijn. Ook wordt vaak de ENDIF vergeten. Het volgende programma loopt prima in basic, maar is niet te compileren.¢¢10 FOR P=1 TO 10¢20 IF P<5 THEN NEXT P¢30 ?"P IS GELIJK OF GROTER DAN 5"¢40 NEXT P¢¢De compiler checkt de listing en ziet 2 maal een NEXT en slexhts eenmaal een FOR. Hij zal het programma dan ook niet compileren.¢¢Ik hoop dat je iets opschiet met mijn antwoord. Mochten er lezers zijn die hier iets aan toe te voegen hebben hoor dat graag.¢¢Heeft u ook een vraag? Stuur deze dan oop aan :¢¢ Stichting Pokey¢ Postbus 798¢ 3100 AT Schiedam¢ o.v.v. Turbo-cursus¢¢¢De vraag hoeft niet met de cursus te maken te hebben. Heeft u vragen in het algemeen over turbo-basic programmeren, of loopt u op de ene of andere manier vast, schroom niet en vuur je vragen af. Deze rubriek is er voor.¢¢¢Tot de volgende keer.¢¢¢¢¢
