Mathc initiation/Fichiers h : x 17c06

Un livre de Wikilivres.
Aller à la navigation Aller à la recherche


Sommaire


Installer et compiler ces fichiers dans votre répertoire de travail.

Crystal Clear mimetype source c.png c06.c
'
/* ---------------------------------- */
/*  Save as :   c06.c                 */
/* ---------------------------------- */
#include "x_ahfile.h"
/* ---------------------------------- */
int main(void)
{
Set A,B,
    D,E;
int i;
 
  create_SetI(&A);  create_SetI(&B);
  create_SetI(&D);  create_SetI(&E);

  for(i=1; i<=7;  i++) insert_EI(&A,i);
  for(i=4; i<=10; i++) insert_EI(&B,i);

  clrscrn();
  p_SetI(&A,"A");
  p_SetI(&B,"B");

  printf(" D = (A inter B)\n");
  inter_SI(&A,&B,&D); 
  p_SetI(&D,"D");

  printf(" A = A union (A inter B)\n");
  union_SI(&A,&D,&E);  
  p_SetI(&E,"E");

  erase_SetI(&E);erase_SetI(&D);
  erase_SetI(&B);erase_SetI(&A);

  stop();

  return 0;
}


Nous allons vérifier que :

  A = A union (A inter B)

Exemple de sortie écran :

A = {7,6,5,4,3,2,1}


 B = {10,9,8,7,6,5,4}



 D = (A inter B)
 D = {4,5,6,7}



 A = A union (A inter B)
 E = {1,2,3,4,5,6,7}




 Press return to continue.