![](https://uzdarbis.lt/uploads/set_resources_11/84c1e40ea0e759e3f1505eb1788ddf3c_pattern.png)
![](https://uzdarbis.lt/uploads/set_resources_11/84c1e40ea0e759e3f1505eb1788ddf3c_default_photo.png)
doncatas
Patvirtinti nariai-
Pranešimai
715 -
Užsiregistravo
-
Lankėsi
-
Atsiliepimai
100%
Turinio tipas
Forumas
Kalendorius
Parduotuvė
Akademija
Skelbimai
Visas doncatas turinys
-
Yra du būdai: tiesiog dalini iš trijų; arba sudedi skaitmenis ir tikrini ar dalinasi iš trijų; Abiejų atsakymai: 3000 Pascal kodas: program Noname14; var i,k,l : integer; sk,sk2,sk3,sk4,sum : integer; begin k:=0; for i:=1000 to 9999 do begin //vienas budas if((i mod 3)=0)then k+=1; //antras budas sk := i div 1000; sk2 := i div 100 - (sk*10); sk3 := i div 10 - (sk*100) - (sk2*10); sk4 := i div 1 - (sk*1000) - (sk2*100) - (sk3*10); sum:=sk+sk2+sk3+sk4; if((sum mod 3)=0)then l+=1; end; WriteLn(k); writeln(l); Readln; end.
-
Google, arba forumo paiešką: į pirmą ir trečią rasi atsakymus tikrai. O antro nelabai supratau, tipo gal: atvaizduoti, redaguoti, trinti, įrašyti?
-
Radau klaidą, bet nežinau gerai tų tavo var, tai pasakysiu kas blogai: Kai skaitai skaičius į šoną naudoji Read(duom_failas,skaičius); Kai baigiasi tas ciklas skaitymo į šoną rašai: Readln(duom_failas);
-
Jokių pasiūlymų :D Gražus darbas, bet nežinau atrodo kad kažko trūksta, arba šiaip iš tokio tipo svetainės kažko daugiau norėčiau tikėtis :D
-
Nežinau, visi čia per daug vien į tą programavimą žiūrit, niekad jis nebuvo jau toks sunkus per vbe, o dabar prijungus b lygį, tai tikrai neturėtų užduotys sunkėti. Geriau pasakykit, kaip y ašį pastatyt ant nulinės x reikšmės. (Apačioj parodyt kaip reik, o pas mane viršuj prie kairės pusės prilipęs) :)
-
Nu tai sakau pačiam reik bandyt, o ne prašai visko ant lėkštutės padėto. Idėja- vienas rimčiausių faktorių lemiančių verslo sėkmę. Ieškokis gal kas populiarėja užsieny, o Lietuvoj nėra ir bandyk tą savo perku->parduodu. O aš registravausi ne dėl pagalbos, o dėl to kad galėčiau dalyvaut dizainų konkursuose.
-
Užsiregistravai tik dėl to paklaust? Pats nepabandęs nesužinosi kur gerai eina pasidaryt pinigų, nes iš visur gali uždirbt, jei esi verslus... Ir šiaip tas pirk->parduok tai man nelabai panašus į verslą, o be to gali stipriai nudegt.
-
Ir durnių laivai dabar iš eilės visi rašo ką daryt (po*uj kad tą patį rašo). Maladiec vyrai, pasirinkit postų, nes paskui levelis nukris...
-
Atrodo taip, jog tam Joniškį(arba bent taip pasirašęs) gyvendamas tu nematai žmonių. Pirk tai kas patiks parduotuvėje, nes tokios parduotuvės nebūna nieko senoviško. Ir šiaip rinkis tai kas patinka... Juokini :D
-
Aš tai už 19. Nes tikrai nesąmonė, kad a,b - vienodi. Nu aišku aš irgi ilgiau galvojau kurį pasirinkt, bet nusprendžiau 19. Tai jie būtų užrašę 2a/c, jei būtų to vienodo skaičiaus. Jaučiu kad ir 19 ir 20 turės užskaityt, nes kitu atveju tai apeliuos pusė žmonių kas tokius atsakymus turėjo...
-
Nu ką gali pasakyt- baisu. Mokytis dar daug. Dizainas tuščias, detalės neišbaigtos ir šiaip nieko naujo. Dizainui duočiau: 0,(0)1/10. Manau su paintu galėčiau tą patį nupiešti.
-
Po kokių išleistuvių, nes jei abiturientų, tai dar iki jų toli... :D
-
Sveikinu ir tave. Tikiuosi per vasarą išmoksi normaliai rašyt, nes pavadinime kai darai dvi klaidas, tai ne kažką...
-
Jau tik pradėjęs skaityt projekto aprašymą- supratau, kad žmogus neeilinis šlamšto kūrėjas. Nuėjęs į puslapį taip pat nenusivyliau! Dėkui. Nusiunčiau vieną faką draugui. :)
-
Padėkite noobai del Wordpress :) Ragų tau, ne pagalbos!
-
Jau per vėlu ruoštis, dabar gali tik kartotis ką susidėjai per 2 metus :) O kartojimui tai pasižiūri iš senesnių vbe ko nesupranti ir sprendi. Arba iš knygos kartojimo skyrius daryk.
-
O tai šitie netinka? http://www.veliavu-stiebai.lt/veliavu-stiebai-stulpai.html
-
Aš kaip supratau jam ne vamzdžio reik, o to kur būna su trosu pasikelia į viršų vėliava.
-
Aš vos už 100Lt su visais dokais vos pardaviau. Manau tau ir reik mažint kainą, nes telefonas tai tikrai peilis- vėžlio greičiu sukasi...
-
Tie lolai, wowai jūsų greit nusibos, o cs kaip lošia 10 metų, taip galo nematyti... :D