Lin3R

program Laikas; var val_prad, {pradinio laiko valandos} min_prad, {pradinio laiko minutës} sek_prad, {pradinio laiko sekundës} sek_plius, {pridedamø sekundþiø skaièius} val, min, sek : integer; sek_isviso : longint; begin Readln(val_prad, min_prad, sek_prad, sek_plius); sek_isviso := val_prad * 3600 + min_prad * 60 + sek_prad + sek_plius; // viskas verciama sekundem. val := sek_isviso div 3600; min := (sek_isviso - val * 3600) div 60; sek := sek_isviso - val * 3600 - min * 60; writeln(val, min:3, sek:3); Readln; end.

0-45/Lietuvos Rytas-Sūduva [email protected] ka manot ? :rolleyes:

man reikia tos akcijos, kas norit į Pm rasykit su kainom :(

Na nelabai supratau ka cia su fonais nori daryti. o random eilute tai trauk ne is failo o is masyvo, nes masyve visos tos eilutes sudetos yra. :(

o antroj nuotraukoj ten ant ekrano ibrezimai ? kiek noretum kad primokeciau ? :D

Nelagina ? Butu galima irasyti orginalu (N70) softa ? Domina keitimas į SE W810i ?

As taip daryciau :D cia visus tuos zodzius sudes i masyva ir paskui is jo isvedines. program antra; type mastip = array [1..200] of string; var s: string; ls: text; MAS : mastip; i : integer; begin i := 1; Assign(ls,'antra.txt'); Reset(ls); while not eof(ls) do begin Readln(ls,MAS[i]); writeln(MAS[i]); i := i + 1; end; close(ls); end.

Jeigu programos *.pas failas yra tame paciame forlderyje tai galima rasyti Assign (ls, 'blablabla.txt'); O jei ne tam paciam tai reikia nurodyti pilna kelia. :(

Kazko sunkiai einasi :D paemiau vis del to paprasta pergale. 0-0 treciam keliny :( o jei buna pratesimas, topsportas grazina ?

Ta trecia dali jie jau ne pirmus metus vis atidelioja, tai taip ir neaskui kada iseis. O kelyje 2 buvo tikrai kazkuom kabinantis zaidimas, kadangi neturi dideliu reikalavimu tai su MX440 galėdavau žaisti :) Nor ir nepavilks mano senukas 3 dalies, bet vistiek jos laukiu :D

Ka manot apie situos ? : Futbolas. Norvegija - 2 Lyga Honefoss-Tromsdalen [email protected] Ledo ritulys. Suomija - SM-Liiga HIFK Helsinki-Jokerit Helsinki [email protected]

Atrodo taip turi but :D if (a = b) or (a = c) or (a = d) or (b = c) or (b = d) or (c = d) then l:= a + b + c + d else l:= a * b * c * d Pagal prioritetus OR pirmiau vykdomas nei palyginimo zenklai :D

Nu ir na vef riga pasisiko, ant 5 tasku pralaimejo :) O anie du laimejo :)

Kiek mokesi kad buciau tavo referalas ?

Na pradzia nebloga, Rock tartu - Zalgiris 0 - 10 :) Siauliai - Nevezis 6 - 4 (pirmo kelinio eigoj)

Tikekimes laimes, as irgi pastaciau :) Sibir Novosibirsk - Metallurg Magnitogorsk 2-1 antram keliny :)

Beliko kad fora praeitu ir viskas :unsure:

Audi 100 C4, B4

Afroman, Metallica, Prodigy - diesel power, Salvador - Sikoman, AC/DC -TNT, Pompa, Looptroop rockers, Da manifest, DJ Vadim, Run DMC, 2Pac, Smoki Mo, Method man, Radioshow-audi 100, Zenitas, G&G Sindikatas, DMX, Wu-Tang clan, GZA, Alizee, Chamillionaire, Messiah, DJ Tomekk, Biz markie, Snoop Dogg, Eric B and Rakim - Paid in full :blink:

Nu cia ir klausimas :) ziurek ko tau labiau reikia arba jei neapsisprendi tai imk paprasta (ne gaming) kompa ir keturrati.

Bus blogai kad numirsim, o paskui pateksim i roju ir bus gerai :) O gal visi scameriai ismirs :) Nemanau kad bus pasaulio pabaiga. gal todel kad neisivaizduoju tokio dalyko.

KET knygutej yra parasyta. Nuo 15x15 iki 20x20cm ;) o klevo nuotrauka google tikrai turi.

Turiu ideja :lol: ji susijus su sportu, lazybom (ne picku pardavinejimas, ne naujienu apie komandu sudetis, traumas dejimas). Bet uz toki atlygi tikrai neatskleisciau jos. ;) Del jos pelningumo nesu tikras ar ji nestu pelno. Pats nedarau nes nemoku programuoti, kurti dizaino ir mazai patirties su web puslapiais.

nesu tikras bet manau pacioj pradzioj nusiskaicius ivesta skaiciu reikia ziureti ar jis lygus # simboliui, jei ne tuomet ziureti ar jis teigiamas ar ne.