Comment supprimmer un élément d'un tableau?

morad11 Messages postés 22 Date d'inscription Statut Membre Dernière intervention -
Amour de fleur - 8 mars 2008 à 20:27

Bonjour,
comment on peut supprimmer un élément d'un tableau en:
-algorithme
-c++
-vb

Afficher la suite

A voir également:

Supprimer un élément d'un tableau algorithme
Supprimer rond bleu whatsapp - Guide
Tableau word - Guide
Trier un tableau excel - Guide
Tableau ascii - Guide
Impossible de supprimer un fichier - Guide

2 réponses

Réponse 1 / 2

Utilisateur anonyme

Question pas assez claire :
C'est supprimer une case, ou juste le chiffre à l'intérieur
C'est un tableau, ou un vecteur?

Et un algorithme n'est pas un langage

Réponse 2 / 2

morad11 Messages postés 22 Date d'inscription Statut Membre Dernière intervention

C'est supprimer le chiffre à l'intérieur
C'est un tableau
JE SAIT QU'un algorithme n'est pas un langage, mais le prof demande ça, j'utilise une astuce mais je veut un vrai méthode.
et voila l'astuce:
Sub Main()

Dim t(11) As Integer
Dim i, del, k, x, j, l, m As Integer
For i = 0 To 9
Console.WriteLine("entrer svp l'element no " & i + 1 & ":")
t(i) = Console.ReadLine
Next
Console.WriteLine("enter l'element que vous voulez supprimmer")
del = Console.ReadLine
k = 0
For i = 0 To 9
For j = 0 To 9
If del = t(j) Then
x = j
k = k + 1
If (k > 0) Then
For l = x To 9
t(l) = t(l + 1)
Next
End If
End If
Next
Next
If k = 0 Then
Console.WriteLine("l'element que veut taper n'existe pas")
End If
Console.WriteLine("les element qui restent:")
For m = 0 To 9
Console.WriteLine(t(m))
Next
m = Console.Read
End Sub
*je laisse une case vide et l'element supprimé reçoit sa contenu
alors comment on peut supprimmer un élément d'un tableau en:
-algorithme
-c++
-vb

Amour de fleur

Module Module1
Sub Main()
Dim n As Integer
Console.Write("Fixer svp la taille de tableau:")
n = Console.ReadLine()
If n <= 0 Then
Console.Write("La taille doit être sup à zéro")
Else
Dim T(n) As Integer
For i = 0 To n - 1
Console.Write("L'elt" & i & "=")
T(i) = Console.ReadLine()
Next
Console.WriteLine("Le tableau de départ est:")
For i = 0 To n - 1
Console.WriteLine(" " & T(i))
Next
Dim Xsupp As Integer
Console.Write("Donnez svp l'index la valeur que vous voulez supprimer:")
Xsupp = Console.ReadLine()
For X = Xsupp + 1 To UBound(T)
T(X - 1) = T(X)
Next
ReDim Preserve T(UBound(T) - 1)
Console.WriteLine("Le nouveau tableau sera:")
For i = 0 To n - 1
Console.WriteLine(" " & T(i))
Next
End If
Console.ReadLine()
End Sub
End Module
C'est le programmen en vb 2008

Discussions similaires

les tableaux de l'algorithmique

C : Chiffres distincts dans un tableau d'int

[TPW] procedure pour remplir un tableau

exercices algorithme tableaux

algorithme de permutation de deux variables

Programme de permutation des éléments d un tableau

Votre réponse

Discussions similaires