1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
|
Variable ip_reseau : Chaîne
Variable rez : Entier
Début
| ip_reseau <- "192.168.1.0"
| rez <- decoupage_chaine ( ip_reseau )
Fin
Fonction decoupage_chaine ( ip_reseau : Chaîne ) : Entier
Variable longeur_chaine , i , compteur : Entier
Variable caractere_courant , debut_chaine , fin_chaine , octet : Chaîne
Variable tableau_octets : Chaîne [ 99 ]
Début
| compteur <- 0
| longeur_chaine <- LgChaîne ( ip_reseau )
| Pour i <- 1 à longeur_chaine Faire
| | caractere_courant <- SousChaîne ( ip_reseau , i , 1 )
| | Si caractere_courant <> "."
| | | compteur <- compteur + 1
| | FinSi
| | Si caractere_courant = "."
| | | octet <- DébutChaîne ( ip_reseau , compteur )
| | | Afficher ( "Debut chaine :" & i & " ->" & octet )
| | | ip_reseau <- FinChaîne ( ip_reseau , compteur )
| | | Afficher ( "FinChaine N :" & i & " ->" & ip_reseau )
| | | compteur <- 0
| | FinSi
| FinPour
Fin |
Partager