Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
4658 connectés 

  FORUM HardWare.fr
  Programmation

  [TOUS LANGAGES] montrez vos codes

 
 


Dernière réponse
Sujet : [TOUS LANGAGES] montrez vos codes
TBone le temps d'acheter des piles pour mon HP48...
 
je propose (avec gestion d'erreur très basique):
 
demande un string en entrée sur la pile.
[pre]
<<  
"" "" ""  
1 5 PICK SIZE
FOR I  
  PICK HEAD DUP
  IF "G" ==
  THEN DROP ROT "G" + ROT ROT  
  ELSE DUP
    IF "D" ==
    THEN DROP SWAP "D" + SWAP
    ELSE SWAP +  
    END
  END
  4 ROLL TAIL 4 ROLLD
NEXT  
ROT ROT +
ROT DROP SWAP "Err:" SWAP +
>>
 
[/pre]

Votre réponse
Nom d'utilisateur    Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !
Le ton de votre message                        
                       
Votre réponse
[b][i][u][strike][spoiler][fixed][cpp][url][email][img][*]   
 
   [quote]
 
Options

 
Vous avez perdu votre mot de passe ?


Vue Rapide de la discussion
TBone le temps d'acheter des piles pour mon HP48...
 
je propose (avec gestion d'erreur très basique):
 
demande un string en entrée sur la pile.
[pre]
<<  
"" "" ""  
1 5 PICK SIZE
FOR I  
  PICK HEAD DUP
  IF "G" ==
  THEN DROP ROT "G" + ROT ROT  
  ELSE DUP
    IF "D" ==
    THEN DROP SWAP "D" + SWAP
    ELSE SWAP +  
    END
  END
  4 ROLL TAIL 4 ROLLD
NEXT  
ROT ROT +
ROT DROP SWAP "Err:" SWAP +
>>
 
[/pre]
Mara's dad J'aime bien les fonctions monolignes illisibles !
 
Mais seulement quand çà sert à rien  :D
minooye

Mara's dad a écrit a écrit :

Une autre en PHP :
 

Code :
  1. <?php
  2. function ToGD( $in ){ return( str_repeat("G", substr_count( $in, "G" ) ) . str_repeat("D", substr_count( $in, "D" ) ) ); }
  3. echo ToGD( "GDGGDGDGDGDGGDGDGDGDGGGDDG" );
  4. ?>

 




Joli :)

Mara's dad Une autre en PHP :
 

Code :
  1. <?php
  2. function ToGD( $in ){ return( str_repeat( "G", substr_count( $in, "G" ) ) . str_repeat( "D", substr_count( $in, "D" ) ) ); }
  3. echo ToGD( "GDGGDGDGDGDGGDGDGDGDGGGDDG" );
  4. ?>

 

[jfdsdjhfuetppo]--Message édité par Mara's dad--[/jfdsdjhfuetppo]
Ventilo En basic:

Code :
  1. Dim GD As String
  2.     Dim Gauche As String, Droite As String, Resulta As String
  3.     Dim i As Long
  5.    
  6.     GD = "GDGGDGDGDGDGGDGDGDGDGGGDDG"
  8.     For i = 1 To Len(GD)
  9.         If Mid(GD, i, 1) = "G" Then
  10.             'ok
  11.         ElseIf Mid(GD, i, 1) = "D" Then
  12.             'ok
  13.         Else
  14.             MsgBox "La chaine contien autre chose que G ou D", vbInformation
  15.         End If
  16.     Next i
  18.     For i = 1 To Len(GD)
  19.         If Mid(GD, i, 1) = "D" Then
  20.             Gauche = Gauche & Mid(GD, i, 1)
  21.         ElseIf Mid(GD, i, 1) = "G" Then
  22.             Droite = Droite & Mid(GD, i, 1)
  23.         Else
  24.             Exit Sub
  25.         End If
  26.     Next i
  28.     Resulta = Gauche & Droite
  29.     MsgBox Resulta, vbInformation

 

[jfdsdjhfuetppo]--Message édité par Ventilo--[/jfdsdjhfuetppo]
LeGreg

juju_le_barbare a écrit a écrit :

 
EN C++ :
#include <string.h>
#include <iostream.h>
 
char *classer(char *pasclasse)
{
int g=0, d=0;
char *classe;
for (int i=0; i<sizeof(pasclasse); i++)
 if (pasclasse[i] = 'G')
  g++;
 else
  d++;
for (i=0; i<g; i++)
 strcat(classe, "G" );
for (i=0; i<d; i++)
 strcat(classe, "D" );
return classe;
}
 
void main()
{
cout << classer("GDGGDGDGDGDGGDGDGDGDGGGDDG" );
}




 
Marche pas ton code..
 
LEGREG

matafan En perl :

Code :
  1. $_=<>;while(s/DG/GD/){};print


 
Ou bien, en plus performant mais plus long :

Code :
  1. $l=length($_=<> );$g=tr/G//;print "G"x$g."D"x($l-$g)


 
Bien sûr ces 2 programmes prennent la chaine sur l'entrée standard.

 

[jfdsdjhfuetppo]--Message édité par matafan--[/jfdsdjhfuetppo]
minooye Et hop, un ti coup de php :D
<?
$chaine= "GDGGDGDGDGDGGDGDGDGDGGGDDG";
$a= Strlen($chaine);
$chaine= str_replace("D","",$chaine);
$b= $a-Strlen($chaine);
for($i=1;$i<=$b;$i++){$chaine=$chaine."D";}
echo $chaine;
?>
bjone a ba non c pas ça :D
a taleur

 

[jfdsdjhfuetppo]--Message édité par bjone--[/jfdsdjhfuetppo]
LeGreg

juju_le_barbare a écrit a écrit :

c'est pas très dur ça lecture écriture dans un fichier...
Plutôt une fonction qui a comme paramètre "GDGGDGDGDGDGGDGDGDGDGGGDDG", et qui renvoie 1 chaine avec tous les G à gauche, et tous les D à droite...




 
un code qui marche sans lib externe.
 

Code :
  1. void trie(const char* src, char *dst) {
  2.   int cpt=0; const char *ptr = src;
  3.   while (*ptr!='\0') (*ptr++=='G')?(dst[cpt++]='G'):0;
  4.   while (src[cpt]!='\0') dst[cpt++]= 'D';
  5.   dst[cpt] = '\0';
  6. }
  8. int main() {
  9.   char src[] = "GDGGDGDGDGDGGDGDGDGDGGGDDG";
  10.   char dst[sizeof(src)];
  11.   trie (src, dst);
  12.   return 0;
  13. }


 
A+
LEGREG
edit : remaniement du code

 

[jfdsdjhfuetppo]--Message édité par legreg--[/jfdsdjhfuetppo]
Cherrytree Arrgh ! Dommage.
LeGreg

Cherrytree a écrit a écrit :

LEGREG >  J'imagine que tu en as d'autres des comme ça. Tu peux nous gratifier d'une URL s'il te plait ?  




euh non c'est juste une des blagues qui atterrissent
parfois dans ma boite mail.
 
LEGREG

Aricoh pour ceux qui ne connaissent pas, y a ce truc de ouf' :
 
http://www2.latech.edu/~acm/HelloWorld.shtml
Cherrytree LEGREG >  J'imagine que tu en as d'autres des comme ça. Tu peux nous gratifier d'une URL s'il te plait ?
Harkonnen Eh, LEGREG, t'as oublié le cas du hacker complètement déjanté qui veut à tout prix optimiser son prog !!
 
Hello SEGMENT
      ORG 100h
      ASSUME CS:Hello
 
Go    JMP Debut
 
Texte DB 'Hello World$'
 
Debut MOV DX, OFFSET Texte
      PUSH AX
      MOV AH,09h
      INT 21h
      POP AX
      INT 20h
 
Hello ENDS
      END Debut
 
 :lol:  :lol:  :lol:
C_Po_Ma_Faute LEGREG > vraiment lolant, j'ai faillit me pisser dessus
 
:lol: :lol: :lol: :lol: :lol:
Bloodymary_ LEGREG :  :lol:  :lol:  :lol:  :lol:  :lol:  :lol:  :lol:  
 
Du grand art !
Aricoh legreg : BRUTE !!! :ouch::benetton::crazy:

 

[jfdsdjhfuetppo]--Message édité par Aricoh--[/jfdsdjhfuetppo]
Jar Jar

kadreg a écrit a écrit :

C'est pas la façon la plus efficace, il y a pas de verif de la chaine d'entrée, mais au moins elle montre des caractéristiques interressantes du langage :


Euuuuh, et c'est quel langage ?

vapo Legred  :lol:  :lol:  :lol:  :lol:  
Trop fort !
Et c'est tellement vrai !
J'adore vraiment très fort...
gfive Allez, en Java :  
 
class Truc {
 
  public static String Trie(String s) {
     char[] ca = s.toCharArray();
     StringBuffer gbuffer = new StringBuffer();
     StringBuffer dbuffer = new StringBuffer();
 
     for (int i = 0; i < s.length; i++) {
         switch ca[i] {
             case 'G':
                 gbuffer.append(ca[i]);
                 break;
             case 'D':
                 dbuffer.append(ca[i]);
                 break;
              default:
                 System.out.println("J'ai dit des G ou des D, banane!" );
                 break;
         }
         System.out.println(dbuffer.toString()+gbuffer.toString());
     }
 
     public static void usage() {
         System.out.println("Truc [serie de G et de D]" );
     }
     
     public static void Main(String[] args) {
        if (args.lengh == 1) {          
          Trie(args[0]);
        } else {
           usage();
        }
     }
}
kadreg C'est pas la façon la plus efficace, il y a pas de verif de la chaine d'entrée, mais au moins elle montre des caractéristiques interressantes du langage :
 

Code :
  1. String machaine="GDGGDGDGDGDGGDGDGDGDGGGDDG" ;
  2.     String result;
  4.     machaine.substitute ("G", "G:" );
  5.     machaine.substitute ("D", "D:" );
  6.     machaine.strip (":" );
  8.     machaine.segment (":" ) {
  9.         if (self == "G" ) {
  10.             result.prepend (self);
  11.         } else {
  12.             result.strcat (self);
  13.         }
  14.     }
  16.     StdOut.write (result + NL);

 

[jfdsdjhfuetppo]--Message édité par kadreg--[/jfdsdjhfuetppo]
ITM legreg : LOL  :D  
Sauf pour la terminale:
10 PRINT "Hello World"
20 END
 
JE suis en terminale, mais je ne suis pas tombé si bas quand même...  ;)
Sh@rdar legreg >>>  :lol:  :lol:
Jar Jar En Python :
 

Code :
  1. machaine="GDGGDGDGDGDGGDGDGDGDGGGDDG"
  3. def trier(chaine):
  4.    return chaine.count("G" )*"G"+chaine.count("D" )*"D"
  6. print trier(machaine)

 

[jfdsdjhfuetppo]--Message édité par Jar Jar--[/jfdsdjhfuetppo]
LeGreg Le but de la manipulation est d'écrire un programme qui
Affichera "HELLO WORLD" à l'écran.
 

Code :
  1. Terminale
  2. -----------------------------------------------------
  3. 10 PRINT "HELLO WORLD"
  4. 20 END
  7. DUT 1ère année
  8. -----------------------------------------------------
  9. program HELLO(input, output)
  10. begin
  11. writeln('HELLO WORLD')
  12. end
  15. DUT 2ème année
  16. -----------------------------------------------------
  17. (defun HELLO
  18. (print
  19. (cons 'HELLO (list 'WORLD))
  20. )
  21. )
  24. Fraîchement sorti de l'école
  25. -----------------------------------------------------
  26. #include
  27. void main(void) {
  28. char *message[] = {"HELLO ", "WORLD"};
  29. int i;
  31. for(i = 0; i < 2; ++i)
  32. printf("%s", message[i]);
  33. printf("\n" );
  34. }
  37. Professionnel très expérimenté
  38. -----------------------------------------------------
  39. #include
  40. #include
  41. class string {
  42. private:
  43. int size;
  44. char *ptr;
  45. public:
  46. string() : size(0), ptr(new char('\0')) {}
  48. string(const string &s) : size(s.size) {
  49. ptr = new char[size + 1];
  50. strcpy(ptr, s.ptr);
  51. }
  53. ~string() {
  54. delete [] ptr;
  55. }
  57. friend ostream &operator <<(ostream &, const string
  58. &);
  59. string &operator=(const char *);
  60. };
  62. ostream &operator<<(ostream &stream, const string &s) {
  63. return(stream << s.ptr);
  64. }
  66. string &string::operator=(const char *chrs) {
  67. if (this != &chrs) {
  68. delete [] ptr;
  69. size = strlen(chrs);
  70. ptr = new char[size + 1];
  71. strcpy(ptr, chrs);
  72. }
  73. return(*this);
  74. }
  76. int main() {
  77. string str;
  78. str = "HELLO WORLD";
  79. cout << str << endl;
  80. return(0);
  81. }
  84. Professionnel vraiment très très expérimenté
  86. --------------------------------------------------
  88. -------------
  89. -----------
  91. --------------------------------
  92. [
  93. uuid(2573F8F4-CFEE-101A-9A9F-00AA00342820)
  94. ]
  95. library LHello
  96. {
  97. // bring in the master library
  98. importlib("actimp.tlb" );
  99. importlib("actexp.tlb" );
  101. // bring in my interfaces
  102. #include "pshlo.idl"
  103. [
  104. uuid(2573F8F5-CFEE-101A-9A9F-00AA00342820)
  105. ]
  106. cotype THello
  107. {
  108. interface IHello;
  109. interface IPersistFile;
  110. };
  111. };
  113. [
  114. exe,
  115. uuid(2573F890-CFEE-101A-9A9F-00AA00342820)
  116. ]
  117. module CHelloLib
  118. {
  119. // some code related header files
  120. importheader();
  121. importheader();
  122. importheader();
  123. importheader("pshlo.h" );
  124. importheader("shlo.hxx" );
  125. importheader("mycls.hxx" );
  127. // needed typelibs
  128. importlib("actimp.tlb" );
  129. importlib("actexp.tlb" );
  130. importlib("thlo.tlb" );
  132. [
  133. uuid(2573F891-CFEE-101A-9A9F-00AA00342820),
  134. aggregatable
  135. ]
  136. coclass CHello
  137. {
  138. cotype THello;
  139. };
  140. };
  142. #include "ipfix.hxx"
  143. extern HANDLE hEvent;
  144. class CHello : public CHelloBase
  145. {
  146. public:
  147. IPFIX(CLSID_CHello);
  149. CHello(IUnknown *pUnk);
  150. ~CHello();
  152. HRESULT __stdcall PrintSz(LPWSTR pwszString);
  154. private:
  155. static int cObjRef;
  156. };
  158. #include
  159. #include
  160. #include
  161. #include
  162. #include "thlo.h"
  163. #include "pshlo.h"
  164. #include "shlo.hxx"
  165. #include "mycls.hxx"
  167. int CHello::cObjRef = 0;
  169. CHello::CHello(IUnknown *pUnk) : CHelloBase(pUnk)
  170. {
  171. cObjRef++;
  172. return;
  173. }
  175. HRESULT __stdcall CHello::PrintSz(LPWSTR pwszString)
  176. {
  177. printf("%ws\n", pwszString);
  178. return(ResultFromScode(S_OK));
  179. }
  181. CHello::~CHello(void)
  182. {
  183. // when the object count goes to zero, stop the server
  184. cObjRef--;
  185. if( cObjRef == 0 )
  186. PulseEvent(hEvent);
  187. return;
  188. }
  190. #include
  191. #include
  192. #include "pshlo.h"
  193. #include "shlo.hxx"
  194. #include "mycls.hxx"
  196. HANDLE hEvent;
  198. int _cdecl main(int argc, char * argv[]) {
  199. ULONG ulRef;
  200. DWORD dwRegistration;
  201. CHelloCF *pCF = new CHelloCF();
  203. hEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
  205. // Initialize the OLE libraries
  206. CoInitializeEx(NULL, COINIT_MULTITHREADED);
  208. CoRegisterClassObject(CLSID_CHello, pCF,
  209. CLSCTX_LOCAL_SERVER,
  210. REGCLS_MULTIPLEUSE, &dwRegistration);
  212. // wait on an event to stop
  213. WaitForSingleObject(hEvent, INFINITE);
  215. // revoke and release the class object
  216. CoRevokeClassObject(dwRegistration);
  217. ulRef = pCF->Release();
  219. // Tell OLE we are going away.
  220. CoUninitialize();
  222. return(0);
  223. }
  225. extern CLSID CLSID_CHello;
  226. extern UUID LIBID_CHelloLib;
  228. CLSID CLSID_CHello = { /* 2573F891-CFEE-101A-9A9F-
  229. 00AA00342820 */
  230. 0x2573F891,
  231. 0xCFEE,
  232. 0x101A,
  233. { 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 }
  234. };
  236. UUID LIBID_CHelloLib = { /* 2573F890-CFEE-101A-9A9F-
  237. 00AA00342820 */
  238. 0x2573F890,
  239. 0xCFEE,
  240. 0x101A,
  241. { 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 }
  242. };
  244. #include
  245. #include
  246. #include
  247. #include
  248. #include
  249. #include "pshlo.h"
  250. #include "shlo.hxx"
  251. #include "clsid.h"
  253. int _cdecl main(int argc, char * argv[]) {
  254. HRESULT hRslt;
  255. IHello *pHello;
  256. ULONG ulCnt;
  257. IMoniker * pmk;
  258. WCHAR wcsT[_MAX_PATH];
  259. WCHAR wcsPath[2 * _MAX_PATH];
  261. // get object path
  262. wcsPath[0] = '\0';
  263. wcsT[0] = '\0';
  264. if( argc 1) {
  265. mbstowcs(wcsPath, argv[1], strlen(argv[1]) + 1);
  266. wcsupr(wcsPath);
  267. } else {
  268. fprintf(stderr, "Object path must be specified\n" );
  269. return(1);
  270. }
  272. // get print string
  273. if(argc 2)
  274. mbstowcs(wcsT, argv[2], strlen(argv[2]) + 1);
  275. else
  276. wcscpy(wcsT, L"Hello World" );
  278. printf("Linking to object %ws\n", wcsPath);
  279. printf("Text String %ws\n", wcsT);
  281. // Initialize the OLE libraries
  282. hRslt = CoInitializeEx(NULL, COINIT_MULTITHREADED);
  284. if(SUCCEEDED(hRslt)) {
  285. hRslt = CreateFileMoniker(wcsPath, &pmk);
  286. if(SUCCEEDED(hRslt))
  287. hRslt = BindMoniker(pmk, 0, IID_IHello,
  288. (void **)&pHello);
  290. if(SUCCEEDED(hRslt)) {
  291. // print a string out
  292. pHello->PrintSz(wcsT);
  294. Sleep(2000);
  295. ulCnt = pHello->Release();
  296. } else
  297. printf("Failure to connect, status: %lx",
  298. hRslt);
  300. // Tell OLE we are going away.
  301. CoUninitialize();
  302. }
  304. return(0);
  305. }
  310. Administrateur Système
  311. -----------------------------------------------------
  312. #include
  313. main() {
  314. char *tmp;
  315. int i=0;
  317. /* on y va bourin */
  318. tmp=(char *)malloc(1024*sizeof(char));
  319. while (tmp[i]="HELLO WORLD"[i++]);
  321. /* Ooopps y'a une infusion ! */
  322. i=(int)tmp[8];
  323. tmp[8]=tmp[9];
  324. tmp[9]=(char)i;
  325. printf("%s\n",tmp);
  326. }
  329. Apprenti Hacker
  330. -----------------------------------------------------
  331. #!/usr/local/bin/perl
  332. $msg="HELLO, WORLD.\n";
  333. if ($#ARGV >= 0) {
  334. while(defined($arg=shift(@ARGV))) {
  335. $outfilename = $arg;
  336. open(FILE, ">" . $outfilename) || die "Can't write
  337. $arg: $!\n";
  338. print (FILE $msg);
  339. close(FILE) || die "Can't close $arg: $!\n";
  340. }
  341. } else {
  342. print ($msg);
  343. }
  344. 1;
  347. Hacker expérimenté
  348. -----------------------------------------------------
  349. #include
  350. #define S "HELLO, WORLD\n"
  351. main(){exit(printf(S) == strlen(S) ? 0 : 1);}
  354. Hacker très expérimenté
  355. -----------------------------------------------------
  356. % cc -o a.out ~/src/misc/bv/bv.c
  357. % a.out
  360. Gourou des Hackers
  361. -----------------------------------------------------
  362. % cat
  363. HELLO, WORLD.
  364. ^D
  367. Directeur junior
  368. -----------------------------------------------------
  369. 10 PRINT "HELLO WORLD"
  370. 20 END
  373. Directeur
  374. -----------------------------------------------------
  375. mail -s "HELLO, WORLD." bob@b12
  376. Henri, pourrais-tu m'écrire un programme qui écrit "HELLO,
  377. WORLD." À l'écran?
  378. J'en ai besoin pour demain.
  379. ^D
  382. Directeur sénior
  383. -----------------------------------------------------
  384. % zmail Jean
  385. J'ai besoin d'un programme "HELLO, WORLD." Pour cette
  386. après-midi.
  389. Président Directeur Général
  390. -----------------------------------------------------
  391. % letter
  392. letter: Command not found.
  393. % mail
  394. To: ^X ^F ^C
  395. % help mail
  396. help: Command not found.
  397. % damn!
  398. !: Event unrecognized
  399. % logout


 
LEGREG

Aricoh

juju_le_barbare a écrit a écrit :

et c'est ce que tu voulais ?



ce que je voulais, c'est voir comment, selon les langages, on peut obtenir le même résultat
 
Mon truc n'avait pas pour autre but que ça, comme si j'avais demandé "dites, comment vous faites le programme Hello, World" dans votre langage ?

juju_le_barbare pardon  :crazy:  
 
http://forum.hardware.fr/forum2.ph [...] ic=&trash=
darklord

juju_le_barbare a écrit a écrit :

et c'est ce que tu voulais ?
 
et mon problème sur software, kkun a une idée ???  




 
si tu filais le lien ...

juju_le_barbare et c'est ce que tu voulais ?
 
et mon problème sur software, kkun a une idée ???
Aricoh en PERL :
 
my $G;
my $D;
my $chaine = "GDGGDGDGDGDGGDGDGDGDGGGDDG";
 
while ($chaine) {
    $_ = chop($chaine);
    $G .= $_ if ($_ =~ /G/);
    $D .= $_ if ($_ =~ /D/);
}
print "$G$D";
juju_le_barbare c'est pas très dur ça lecture écriture dans un fichier...
Plutôt une fonction qui a comme paramètre "GDGGDGDGDGDGGDGDGDGDGGGDDG", et qui renvoie 1 chaine avec tous les G à gauche, et tous les D à droite...
 
EN C++ :
 
 
#include <string.h>
#include <iostream.h>
 
char *classer(char *pasclasse)
{
int g=0, d=0;
char *classe;
for (int i=0; i<sizeof(pasclasse); i++)
 if (pasclasse[i] = 'G')
  g++;
 else
  d++;
for (i=0; i<g; i++)
 strcat(classe, "G" );
for (i=0; i<d; i++)
 strcat(classe, "D" );
return classe;
}
 
void main()
{
cout << classer("GDGGDGDGDGDGGDGDGDGDGGGDDG" );
}
 
 
Très loin d'être optimisée (pas de vérification qu'il y ait que des G et des D en entrée, etc...), mais c'est juste pour montrer ce qu'on doit faire...
pis là j'ai un pb très important et j'attends la réponse sur software et réseau !!! HELP ME !!! :cry:  :cry:
 
 :hello:  
 
elle est dans l'esprit de ce que tu cherche mon idée ?

 

[jfdsdjhfuetppo]--Message édité par juju_le_barbare--[/jfdsdjhfuetppo]
darklord bin vas y balance .. :)
Aricoh oui je sais, c'est bête comme topic
 
Le but du jeu : à partir d'un petit cas concrèt, vous montrez le code que vous aurez fait en indiquant le langage utilisé.
 
Qui propose un petit cas concrèt ? Heu, pas un truc de 50 lignes, je sais po moa, un petit exo avec lecture/écriture dans un fichier ?
 
Qui s'y colle ?
 
Zo fait, ma spécialité c'est PERL et j'vous préviens tt de suite : j'va vous perler la têteuuuuu :lol:

Forum MesDiscussions.Net, Version 2010.2
(c) 2000-2011 Doctissimo

Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)