Rhymond

program Kioskas; Const Cduom = 'kioskas.txt'; Crez = 'Rez.txt'; Cmax = 100; Type Prekes = Record pavadinimas : string[20]; kiekis, kaina, sum : real; End; Mas = Array[1..Cmax] of Prekes; Var B, F : text; n : integer; A : Mas; {--------------------------Funkcijos ir procedûros----------------------------} Function Suma : real; var i : integer; Begin For i := 1 to n do Suma := Suma + A[i].sum; End; Procedure Skaiciuoti; Var i, vieta : inte

klausau muzikos no problem :) Nelabai tikėtina, jog nulaušta

yra laidai kokie ?

Ar žinot ar nežinot jūs šį tinklapį, bet jis man padėjo išmokti pascalį taip pat pasiruošti pačiam informatikos egzaminui čia yra daug iformacijos kuris pagelbėt mokantis, ar jau išmokusiems:) http://programavimopamokos.net/index.php

Įkelta naujų darbų pavyzdžių

Aš dirbu abejose :) viskas super, tikrai daugiau darbo užsakymų, tik aišku laiko viskam išmokt reikia reikia, bet jei turi laiko tik imkis, gal vienas ims ir atsibos, bet jau pagrindus tu jo turėsi. Tai džiaukis kitą kart padėt galėsi nevien viena sritim, kaip sakoma, ką išmoksi ant pečių nenešiosi :) bet jei koncetruosies tik į vieną aišku rezultatai tikrai bus geresni :) bet į klausimą ar galima atsakau. TAIP galima.

Labas :)

Sveikas, visada laisvas naujoms pažintims ;) ačiū

Svarbiausia visada pasiekti užbrėžto tikslo ir reikia turėti daug kantrybes, nes būna koduose stringi ir turi sugalvot išeitį, tai kartais tenka žiūrėt į ekraną pora valandų ir nieko nedaryt tiesiog galvot.. Nėra lengva, nemanau, jog kiekvienas gali ;) bet kas gali VALIO!

kokiai sistemai ?

Nepešęs liks programutojas, kaip pavizdys: Aš sukuriu popieriaus lapą, paduodu žmogui, jog jis parašytų Rašinį ir kai jis jį parašo ar galiu teigti, jog rašinys mano, nes aš sukūriau lapą... Nelogiška.

eik tik jėga išmušinėt ;) kur tu kreipsies jei ir taip viskas nelegaliai vyko.

dalyvausiu :)

Net nebūčiau sugalvojąs reikia dėkot kegriai Aštuoni šimtai penkiasdešimt šeši tūkstančiai aštuoni šimtai devyniasdešimt.

vo radau :D nebereik ;D

ką reiškia šitie skaičiai? 856890

:D ačiū

Mano manymu geriausia savo darytis ;) nors pasidarysi pagal savo pageidavimus, aišku kaina yra bėda ;)

jeigu tapai tai gerai ;D

Kur rasti notebook'o kinietiškų ir nekinietiškų kuo pigiau, nes lietuvoje kainos žvėriškai didelės ;)

Blogas atnaujintas ;)

Iš tiesų laužau programuotojų stereotipus ;) nežinau tai gerai negerai, bet kitaip man ir neišeina , o programuotoju mėgstu būt, nes turiu gerą loginį mąstymą ir labai mėgstu problemas ir loginius uždavinius ir taip pat mėgstu darbą, esu grynas darboholikas ir man mama nors ir liepe jau ilsėtis, aš jai vistiek sakau, jog mano polsis yra darbas ir mokslas. Begalo mėgstu mokytis sužinoti kažką naujo ir tai panaudoti ateityje, didelis mano minusas, jog nemėgstu ir nesimokinu iš knygų :)

Labai gera girdėti, tikrai labai malonu ;) nežinau reikia pradėt man daugiau video sukt ar kažką panašaus, nes parodyt turiu daug ką, bet neišnaudoju ir niekam viso to neparodau.. Aišku tai nėra būtina, bet būtų gera man pačiam :)

virusas bus čia ;) pabandyk prapūst gal su kokiu CCleaner'iu neturiu daugiau įdėjų ;)

na aš čia randu visada :)