Lin3R

integer reikia pakeisti į longint (sveiki skaicia tik didesnis intervalas) B-)

Teleloto pries kelis metus 2-5Lt Milijonierius - 1Lt pries ~10-12 metu. Dar siaip kazkokiam portale atskiau i klausima ir laimejau Fifa street 2 (PS2) orginalu zaidima su Killa Kela autografu, tai jis buvo vertingiausias laimetas prizas :rolleyes:

Katik gavau sms: "Labas. Ka veiki kaip sekasi? Labai pasiilgau taves. Atrasyk man bet rasyk is kito tinklo, nes is bites negaunu zinuciu. Atrasyk labai lauksiu" vos neuzkibau :D uzknisa tie spammeriai :rolleyes:

Keitimai domina ? į SE W810i ?

Na as siandien bandziau issiusti kelis sms, pavyko gal ~2 tik issiusti :) o siaip meta klaida :)

Tauragej irgi tik didelis vejas, bet sniego nera kolkas :)

Vakar ziurejau ta programa tai pastebejau kad reikia kablelius pakeisti i taskus. Ir jei bus naudojami realus skaiciai dai dalyba bus / o ne div ir mod :) O pats kiekio litrais skaiciavimas tai man gauvosi taip: l_isviso := gal * 4.55 + bus * 36.4 + (bus * 8 + gal) + (bus * 8 + gal) * 13.65; Tik nezinau ar cia gerai suskaiciuoja.

Idomu but suzinot kodel jos tokios pigios ? :)

As irgi galvojau kad SKA Peterburg laimes, bet pavede si karta :) edit: pasiziurejau, buvau pastates iskaitant ir pratesima.

Nu cia kazkokia keista salyga, atsakymas gaunasi real tipo, o naudoti galima tik sveikojo tipo kintamuosius. :)

Manau geriau butu jei parasytum salyga :) tuomet parasyciau programa. Nes dabar nelabai aisku ka ten skaiciuoti nori :)

Na as uz 3 refus mokejau 0.75$ (menesiui). Praejus 14-ai dienu jie turi suspaude 65 ad'us, uz kiekviena ref paspaudima duoda po 0.005$ , tai gaunasi 65*0.005=0.325$ per 14 dienu. Ir jie beveik kiekviena diena spaudo vis maziau, tai nemanau kad atsipirks. Kai pradzioj buvau nusipirkes juos, tai refu AVG budavo 1.7-3, o dabar 1.3-2

Na pats turiu nuspirkes 3 ref neobux'e pabandymui, tai ziuriu kad sunkiai atsipirks. Pradzioj dar normaliai clickindavo, o dabar isvis miega jie. :) O kaip kitur nezinau.

Cia vaziuojancios uz tokia kaina ? :)

Cia su pakrovejais parduodi ar tik telefonus ?

Tiks. :o

program Lektuvas; var a, b, c, d, val, min : longint; laik : longint; begin Writeln('Iveskite reiksmes'); Readln(a, b, c, d); If ( 0 <= a) and (a < 23) and (0 <= b) and (b < 60) and (30 > C) and (c < 600) and (-12 <= d) and (d <= 12) then begin laik := a * 60 + b; // skaiciuoja kada lektuvas pakilo (minutemis). laik := laik + c + d * 60; // skaiciuoja kada nusileis (minutemis). val := laik div 60; // skaiciuoja kiek valandu bus nusileidimo metu. min := laik - val * 60; // skaiciuoja kiek minuciu bus nusileidimo metu. Writeln('Lektuvas nusileis ', val

Tai cia kaip supratau tie apribojimai bus vartotojui t.y. jis ivesdamas reiksmes ives tik tokias kad isitektu i apribojimus. Pvz.: Kintamasis A bus bet koks skaicius tarp 0 ir 23 Kintamasis B tarp 0 ir 60 ir t.t. Tu aprobojimu programoj aprasyti nereikia atrodo. O jei reikia tai gali rasyti salygini sakini kuris tikrintu ar ivestos reiksmes patenka i intervala, jei patenka tai vykdoma programa.

Nezinau, butu gerai kad visa programa imestum. Gal kas zinos :lol:

Na as irgi uzsiregistravau i pixprofit, tik nerandu kur ten rodo mano uzdarbi. Jei kas norit galit atsiust pakvietima i grupe :lol: Ar mano uzdarbis dides nuo to kad as busiu grupej ?

Dekit i aukcionus visokius, senoviniu daiktu forumus, gal kas nupirks :lol: pats turiu ~1970-95m knygu visokiu, tai buvo tik keletas susidomejusiu.

SE W810i domintu ?

longint tai kintamuju tipas, panasiai kaip integer tik ivesti skaiciai gali buti didesni. http://gedzis.net/irasai/pascal-skaiciu-ti...ai-su-skaicias/

O kazin prisegtas txt failas suveiktu ? :lol:

Nu keistoka tema :lol: tokia nei juoktis nei verkti. Idomu kokio amziaus ta pagyvenusi moteris ? , gal arkli pasikinkyti ir uztektu :lol: O siaip nelabai kas masinas uz dyka dovanos, juk visiem sunki padetis. O tas "senas bet dar vaziuojantis" tai ir bus toks kad toli nenuvaziuosi, o ir pinigu remontui sukisti reikes.