EnT! TeCkToN!K M@KeD By xE^

EnT! TeCkToN!K M@KeD By xE^
[ Ajouter un commentaire ] [ Aucun commentaire ]
# Posté le lundi 06 juillet 2009 14:02

Cs TEaM 1.6 ThE X G@MeUrs

Cs TEaM 1.6 ThE X G@MeUrs
chaque soir sur steam on trime pour rentrer
don ma team ya pa de noob ya que des gameur defoncé
je prond le mic pour representé les cayra du 1.6
mon nom c (B).(I).(L) me voila sur les ondes FM
mon son c pour les X gameur
qui son la pour foutre la demeur
et fair renier le maleur
alors un conseille tu devrais avoir peur male au coeur ou resté un spectateur
(B).(I).(L) je suis loncé pa pour t'onfancé mais pour representé
mes frére tts gongstair ici sur tére

on réve tts de roulé on porche
mais on as rien don les poches
on as que dalle zero ball mais on est al

la téte haute la b!t dur
algerien fire avec le seng pur
[ Ajouter un commentaire ] [ Aucun commentaire ]
# Posté le jeudi 02 juillet 2009 06:02

AlGeR!E

AlGeR!E
algerie mon paye natale
des grains de sa taire cool don mes artaire
mon seng et de couleur rouge bland et ver
et de vivre don ce contry me rond fiere
[ Ajouter un commentaire ] [ Aucun commentaire ]
# Posté le vendredi 12 juin 2009 08:24
Modifié le vendredi 12 juin 2009 09:15

AlGeR!A ThE bEsT

AlGeR!A ThE bEsT
une victoir ecrasente contre les égyptiens
[ Ajouter un commentaire ] [ Aucun commentaire ]
# Posté le mercredi 10 juin 2009 10:03

Sa C cOn Je TrOuV R!En A fA!r Lol Et Sa MaR!Ve SoUvAnT

Un Pt! AlGo PoUr PaSsé Le TeMpS LoOoL



program jh;
uses crt;
label 10,20,30,40,50,60,70 ;
var

t : array [1..100,1..100] of integer ;

i,k,f,l,z,n,h,m,y : integer;
begin
h:=1 ;m :=0;y:=5;goto 10 ;
clrscr;
40 : 70 : writeln('enter la taille de la matrice ');
read(y);
if y mod 2 = 0 then begin
textcolor(red);
writeln(' le nombre de case don une ligne doi etre impaire');
textcolor(7);
goto 70 ;
end
else
10 : clrscr;


clrscr;
for i := 1 to y do begin
for k := 1 to y do begin
t[i,k] := m;
end;
end;



n :=y;
k:=1;
f:=1+(n div 2);
l:=y;
z:=f;

for i:= f to y do begin
t[i,k] :=h;
t[i,l]:=h;
t[z,k]:=h;
t[z,l]:=h;
z:= z-1;k:=k+1;l:=l-1;
end;
z:=1;
for i:=1 to y do begin
for l:=z to 20 do begin
writeln;
end;
writeln;

write(' ');


for k:=1 to y do begin
if t[i,k] = h then begin
textcolor(25);

write(' ',t[i,k]) ;
end;
if t[i,k]=m then begin

textcolor(2);
write(' ',t[i,k]);
end;

end;
z:=20;
end;
writeln;
textcolor(7);
writeln (' pour relancer l''aplication tap‚ 1 pour quiter tap‚ 0 ');
30 : read (k);
if k = 1 then begin
for i := 1 to y do begin
for k := 1 to y do begin
t[i,k] := 0;
end;
end;
goto 20;
end
else if k = 0 then begin
textcolor(30);
writeln(' merci pour votre visite ');
textcolor(7);
readln;
goto 50;
end

else begin
textcolor(red);
writeln(' votre choi ne figure pa parmis les proposition si desssu veille le refair ');
textcolor(7);
goto 30 ;
end;
60 : 20 : writeln(' pour changer les ',h,' par un autre chifr taper le ');
read (h);
writeln(' pour changer les ',m,' par un autre chifre taper le ');
read(m);
if (h > 10) or (m >10 ) then begin
textcolor(red);
writeln(' vous dever choisire des chifres entre 0 et 9 SVP ');
textcolor(7);
goto 60;
end
 else
goto 40 ;

50 : readln;
end.
[ Ajouter un commentaire ] [ Aucun commentaire ]
# Posté le jeudi 04 juin 2009 14:54
Modifié le jeudi 04 juin 2009 20:25