C_Linas

Man tokia pati bėda,per kitą vartotoją paleidus veikia,ant pagrindinio - ne. Bandžiau ir Userio AppData aplanke ištrinti viską kas susiję su Fps bei registrų tvarkymą paleist,bet ... Daugiau kaip spręsti šią bėda nežinau :(

Aš ir pirkau vienam iš turgų už 20-30 Litų berods odinę.Naudoju antri metai ir jokių bėdų nėra : nei plyšta nei apdriskusi kokia,labai gerai laiko.:)

Medžiagos per vėlai tikrai nebus,o ji naudinga bet kokia :)

Pats buvau planavęs remtis Čiurlioniu,bei Fluxus,o tiksliau Jurgiu Mačiūnu.Ačiū Matto bei twea už duotus pavyzdžius.:) Pats jei ką dar rasiu - pranešiu.

x := 5; y := 6;

for i := x to y do

WriteLn (x + i);

WriteLn (x + y);

Nuo 5 iki 6 - reiškia ciklas suksis du kart,vieną kartą kai i lygus 5 ir kitą,kai i lygus 6.

Kadangi gale sakinio yra Do, o poto iškart komanda , reiškia 2 kart vykdys tą komandą einančia iš kart po Do.

2 kart prasukus komandą ciklas baigsis ir toliau eit viskas iš eilės kas duota, tai yra kita tavo išvedimo komanda.

Jeigu būtų po 'DO' dar 'Begin' ir po visko 'End',tada du kart ciklas dirbtų,tačiau per vieną kartą išvestų po 2 reikšmes į ekraną,tarkim:

x := 5; y := 6;

for i := x to y do

Begin

WriteLn (x + i);

WriteLn (x + y);

end;

Į ekraną būtų išvesta

10

11

11

11

Aš vis dar siūlau daryti taip kaip rašiau viršui.Įraše dar masyvą susikurt kur ir saugosi visus banknotus.Ir teisingai sako,duok visą duomenų failą,truputį aiškiau bus :)

Hmm,mažu daryti du masyvus,vienas banknotų tipams (10Lt, 20Lt .... ) ir kitą kiek tokių banknotų yra.

Tik aš dabar nesuprantu tų skaičių,kas ten kur ką reiškia,pirmas 10 - turimų banknotų skaičius, toliau eina visi 10 banknotų,skaitai į masyvą,jei toks jau yra,kitam masyve( kur skaičiuoji kiek tokių banknotų yra - padidini vienu), jei tokio banknoto dar nėra masyve,prirašai tiesiog. Nežinau,čia kažką pabanadžiau paaiškint,bet ar kas gausis negarantuoju :D

Prašau -> http://programavimopamokos.net/index.php?vaizdas=ITVBE&metai=2010

Gali atsisiųst su video pamoka arba vieną kodą.

Edit: Jei tau tik testukų tai tada nežinau :|

O man asmeniškai tas tinklapiukas gražus,gal tik kiek tas raudonas šriftas nepatiko,norėtųsi šiektiek kitokio formato ar kažko.Beje,kaip kažkas minėjo,facebooke galima padaryti tikrai nemažą reklamą,o darbo per daug ir nereik :)

Gėriau dainos pavadinimą pasakykit,ačiū.:)

Nes skaičiuodamas x1 ir x2 tu varai visus veiksmus iš eilės,neatsižvelgdamas kaip atrodo pati formulė,todėl programa suskaičiuoja kiek kitokia tvarka viską.Pirma skaitikly turi suskaičiuot

 ((-1)*b) - sqrt(d) 

, o po to tik padalint iš dviejų 'A'.Tai klaida yra tame,kad trūksta vienų skliaustų ir tas dvi eilutes tereikia pakeist į

x1:= (((-1)*b) - sqrt(d))/(2*a);
x2:= (((-1)*b) + sqrt(d))/(2*a);

Kiek žinau atvirkščiai,buvo ~1,6-1,8k už vykimą į kursus,kaip aš vadinu apmokymus,bet kai mūsų prezidentė,kuri yra pakvaišusi dėl kariuomenės sumąstė pakelt kareiviams sumas tai ir gavosi iki 2k Lt.Nežinau kiek čia tiesos,tiksliai žinosiu po mėnesio :) Kad ir kaip tai bebūtų,bet savanoriu būt yra gerai,ypač jei esi studentas ir dar kokiu neakivaizdiniu ar esi mokinys,tai karts nuo karto nuvykt,pabūt ir už tai gaut pinigus apsimoka.:)

2 Draugai jau gerą pusmetį tarniauja savanoriuose ir vienas pradeda kitą savaitę,apmokymai 3ių savaičių berods.Būna kartais kokiai savaitei išvažiuoja,kartais vienai,dviem dienom ir už tai gauna pinigus,visai neblogus sakyčiau,už diena nuo 100 iki 200 Lt jei neklystu. Už apmokymus vien moka 1,8-2k~ + gauni uniformą ir kerzus :) Kaip paklausau aišku yra kas veikt.Būna žygiai nubėgt 15 Km su kuprinę kuri sveria ~30 Kg , sustot - pašaudyt ir vėl bėgt ir kitos užduotys.AIšku kaip ir kiekvienoj kariuomenėj gali bet kada pakelt,apsirengt per ne pilną minutę berods,lovą turi būti nepriekaišingai paklota ir t.t :)

Manau,kad prie žmogaus kabinėjatės be reikalo.Gerai,išsakėt savo nuomonę,kad tą ir aną daro negerai,bet gi nebūtina visą laiką prie to kabinėtis,jug galima ir gražiai,maloniom temom pabendraut.:)

Joptararai,tikrai,kad failą visai ir pamišau,my fault.

Man užtenka .exe failą iškelt iš katalogo (Kuriame yra visi source failai) and desktopo.Kataloge ok ,pasileidžia ir dirba kaip pridera.Ant desktopo failą paleidus jis iš kart užsidaro,tarsi programa būtų be readln,tačiau galima įžvelgt,kad rašo kažkokį erorą. Sintaksės ar kitos klaidos? Ne,nes neveiktų nei per kompiliatorių,nei per .exe failą iš katalogo.

Kai .exe failas kartu prie source failų - veikia.Jei perkelsi .exe failą kur kitur ar nusiųsiu kam - neveiks.

Ant C++ su embercadero (su visual ir turėtų būt) eina pasirinkt,kad įrašytų .exe taip,kad veiktų ir kitur,to paties ir čia klausiu ar eina :)

Man įdomu kaip padaryti taip,kad įrašius su paskaliu programą ir paėmus tik .exe failą jis veiktų kitam Pc.Gal žinot kas kaip tai padaryt,jeigu tai įmanoma?

 

Va grynai tokius egzus pasirinkau per klaida kad nu blin niekur....

Jei neklystu,bent jau pas mus,turi dar leisti pasirinkt/pasikeisti egzaminus.Iki Kovo kažkurios tai.Nebent kiekvieoj mokykloj skirtingai :)

yy := yy + 1;
xx[i] := F[i];

Čia kaip suprantu yy - kaupi kiek namų yra be gyventojų ir xx - masyvas kuriame išsaugai tų namų numerius?

Jeigu taip,tai nemanau,kad reiktu naudot kintamajį 'i' , nes tu suki ciklą per visus namus,o tokių,kur nėra gyventoju bus tik keli,todėl tau reikia naudoti kitą kintamajį - 'yy', nes jis didėja tik tada kai randa nama be gyventojų.

yy:=yy +1;
xx[yy]:= F[i];

TOliau,jeigu viską viršui gerai supratau tai

for i := 1 to y do
write(fr, x[i],' ');

čia turėtų būt tų namų išvedimas.Tai kodėl tu naudoji 1 to y ,jeigu tu kaupei namus 'yy',tuo lab ir išvedinėji masyvą 'x' , kai naudojai masyvą ' xx '.Ar aš kažko nesuprantu? :|

P.S Nu išmokit įdėti kodą į tam skritus tagus,tikrai nefaina skaityt tokio teksto :|

Jau ganėtinai senai turiu bėdą - nesiunčia/neranda windowsų atnaujinimų.Eroro kodas toks - 0x80070002.

Bandžiau per google ieškoti sprendimo,radau kelis būdus,stabdyti procedus,pakeisti/ištrinti ir panašiai,tačiau niekas nepadėjo.Bandžiau ir ištrinti paskutinius update,niekas nepadeda ir nebežinau ar dar gali būti kokia išeitis be windowsų perrašymo.Kas dėl pačių windowsu,jie nėra legalūs,tačiau ant kito kompo yra įrašyti tokie patys,tačiau ten tokių nesamonių nėra.

Na ir prie to pačio dar vieną bėda papasakosiu.Įjūngiant Pc internetas būna ale išsijūngęs ( Su geltonu 'x' ar kuo jis ten būna,bet ne raudonas,kad jau visiškai),nors prie skype pusiau prisijungia,visi tie ekrano gadgetai sukontaktuoja,tačiau jei koks browseris ar kas rimčiau - neveikia.Vienintelis būdas kurį dabar žinau tai tiesiog turiu nueit Change adapter settings ir 'Local area connection' disablinti,o vėliau vėl įjūngti (Enable),tas padeda,bet pradeda nusibost,to irgi anksčiau nebuvo. :D