Instruction SWAP sur Qbasic
rsca0123
Messages postés
6
Statut
Membre
-
qbasic45 Messages postés 60 Statut Membre -
qbasic45 Messages postés 60 Statut Membre -
Bonjour,
J'aurai besoin que vous me disiez comment utiliser l'instruction swap sur le Qbasic.
Je sais que c'est pour inverser 2 choses et j'en aurai besoin pour classer plusieurs choses sur le Qbasic.
Dans mon programme, je dois classer par ordre décroissant plusieurs choses. Dois-je les mettre dans une liste avant d'utiliser "swap"?
J'espère que je me suis fais comprendre. Merci pour vos réponses.
J'aurai besoin que vous me disiez comment utiliser l'instruction swap sur le Qbasic.
Je sais que c'est pour inverser 2 choses et j'en aurai besoin pour classer plusieurs choses sur le Qbasic.
Dans mon programme, je dois classer par ordre décroissant plusieurs choses. Dois-je les mettre dans une liste avant d'utiliser "swap"?
J'espère que je me suis fais comprendre. Merci pour vos réponses.
A voir également:
- Instruction SWAP sur Qbasic
- Windows swap - Guide
- Qbasic - Télécharger - Édition & Programmation
- Ajoutez une instruction pour faire afficher le mot secret construit. ✓ - Forum Python
- The instruction data for this shipment have been provided by the sender to dhl electronically ✓ - Forum Consommation & Internet
- Le mot secret ne s'affiche pas, comment pourrais-je faire? ✓ - Forum Python
2 réponses
Bonsoir,
en QBasic, l'instruction swap permet d'échanger deux variables (pas les inverser), sans passer par une variable temporaire
si a=0 et b=1, après swap(a,b), a=1 et b=0
donc swap(a,b) est équivalent à
temp=a : a=b : b=temp
bonne suite.
en QBasic, l'instruction swap permet d'échanger deux variables (pas les inverser), sans passer par une variable temporaire
si a=0 et b=1, après swap(a,b), a=1 et b=0
donc swap(a,b) est équivalent à
temp=a : a=b : b=temp
bonne suite.
bonjour
dim c$(10)
c$(1)="E"
c$(2)="H"
c$(3)="D"
c$(4)="A"
c$(5)="J"
c$(6)="C"
c$(7)="F"
c$(8)="A"
c$(9)="G"
c$(10)="B"
FOR i = 1 TO 10 - 1
FOR j = i + 1 TO 10
IF c$(j) < c$(i) THEN SWAP c$(i), c$(j)
NEXT j
NEXT i
for a=1 to 10
print c$(a);" ";
next a
donee = A B C D E F G H I J
rem
FOR i = 1 TO 10 - 1
FOR j = i + 1 TO 10
IF c$(j) > c$(i) THEN SWAP c$(i), c$(j)
NEXT j
NEXT i
for a=1 to 10
print c$(a);" ";
next a
donee = J I H G F E D C B A
dim c$(10)
c$(1)="E"
c$(2)="H"
c$(3)="D"
c$(4)="A"
c$(5)="J"
c$(6)="C"
c$(7)="F"
c$(8)="A"
c$(9)="G"
c$(10)="B"
FOR i = 1 TO 10 - 1
FOR j = i + 1 TO 10
IF c$(j) < c$(i) THEN SWAP c$(i), c$(j)
NEXT j
NEXT i
for a=1 to 10
print c$(a);" ";
next a
donee = A B C D E F G H I J
rem
FOR i = 1 TO 10 - 1
FOR j = i + 1 TO 10
IF c$(j) > c$(i) THEN SWAP c$(i), c$(j)
NEXT j
NEXT i
for a=1 to 10
print c$(a);" ";
next a
donee = J I H G F E D C B A
