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
- Swap windows - Guide
- Qbasic - Télécharger - Édition & Programmation
- L'instruction à 0x emploie l'adresse mémoire 0x l'état de la mémoire ne peut pas être read ✓ - Forum Windows
- Ajoutez une instruction pour faire afficher le mot secret construit. ✓ - Forum Python
- Manuel d'instruction pdf - Guide
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
