night1

Na į klasikinį Mustangą tai tikrai dujos nelabai, bet į naujesnių metų kodėl gi ne.

laukiu AZ, tik puikiai ismanantys programavima su darbu pavyzdziais.

kaip tuo bugu pasinaudoti?

Parduodu domena, registruotas iv.lt galioja iki lapkricio atiduodu uz 18lt galesiu prideti nuorodu trumpinimo sistema su dizainu Kreiptis PM.

duomenis issaugot taip: 4 13 Jonas Artojas //A[1] 2 51 Petras Melzejas //A[2] 3 71 Anupras Girininkas //A[3] 1 42 Kazimieras Gaspadorius //A[4] 6 34 Donce Sestas //A[5] 1 12 Kulverstukas Padejejas //A[6] Turi butu sulygiuoti

o gal eina kaip nors ta duomenu baze is pvz anglono programos istraukti?

1 uzdavinys: program Bevarde3; type masyvas=array[1..999] of integer; var i, x, y, t, s, kiekis : integer; M : masyvas; begin kiekis:=0; WriteLn('Idomus skaiciai'); for i:=1 to 999 do begin s:=i; while s > 0 do begin t:=s mod 10; x:=x + t * t * t; s:=s div 10; end; if x = i then begin kiekis:=kiekis + 1; M[kiekis]:=i; end; x:=0; end; WriteLn('Tokie skaiciai: '); for i:=1 to kiekis do WriteLn(M[i]); WriteLn('Is viso tokius skaiciu: ', kiekis); ReadLn; end. Analogiska antras uzdavinys: program Bevarde3; type masyvas=array[1..999] of integer; var i, x, y, t, s, kiekis : integer; M : masyv

stai programa program lalala; type mas=array[1..100] of integer; va = record kiek: integer; kokios: mas; end; mas1 = array[1..100] of va; var X: mas1; i, n, j: integer; f, g: text; v: integer; c, b: real; r: real; begin Assign(f, 'duom.txt'); Reset(f); Assign(g, 'rez.txt'); Rewrite(g); ReadLn(f,n); for i := 1 to n do begin Read(f, X[i].kiek); for j := 1 to X[i].kiek do Read(f, X[i].kokios[j]); ReadLn(f); end; r := 0; for i:=1 to n do begin c:=0; b:=0; for j := 1 to X[i].kiek do begin v:=X[i].kokios[j]; c:=c + 1 / v; end; b := 1 / c; r := r + b; end; Write(g, r:0

Turiu samsunga dual sim, yra spec mygtukas perjungti kortelem ir akimirksiu perjungia, daug naudojamas, kolkas jokiu gedimu

As taip pat gavau spamo i el pasta

101

nedarom offtopic Parduodu uz 80lt galima deretis atsiskaitymas banku

*

*

www.eadresas.lt Domenas registruotas iv.lt Siūlau už 80lt. Susidomėję PM.

Sveiki, kaip atkoduoti info esančią faile, kurio galūnė .dic ?

...

O kam reikalingas tas google webmasters toolsas?

...

Parduota.

Tai niekas nežinot? :) Kokios jūsų nuomonės?

Sveiki, o kaip manot ar googlei patinka lietuviškos raidės adrese? Pvz: www.adresas.lt/pažintys ar be lietuviškų geriau www.adresas.lt/pazintys ? Ačiū už atsakymus

Ir man jau galite pašalinti ^_^

11,2Lt

Sveiki, parduodama 120x60 reklama M.o.b.a.i.lt(be tasku) portale Lankomumas: http://www.hey.lt/details.php?id=mobailt Kaina butu 11.2lt/men arba 7.2lt/sav. Atsiskaitymas banku Jeigu domina: PM