Pereiti prie turinio

martixz

Nariai
  • Pranešimai

    360
  • Užsiregistravo

  • Lankėsi

  • Laimėta dienų

    1
  • Atsiliepimai

    90.9%

martixz Pranešimai

  1. Sveiki, turiu elementarią duomenų bazę su "MS Access", iškilo problemėlė.

     

    Duomenų bazę sudaro 8 laukai: ID (prasideda nuo tam tikros pradinės reikšmės, integer), Savikaina (double), Svoris (double), Pardavimas (double), Lūp/dėž (select list iš dviejų reikšmių "Lūpinis", "Dėžutinis"), Atspausdintas? (select iš "Atspausdintas", "Neatspausdintas"), Pavadinimas (selectbox) ir dar vienas laukelis - Pastabos (string).

     

    Žodžiu, yra duomenų bazė ir įvedimo forma (formoje lauko "Pavadinimas" reikšmės turi tam tikrus numerius, bet įvedus atvaizduojamos be numerių, skiriamos kableliu). Nesugalvoju, kaip padaryti, jog kiekvienai parinktai reikšmei iš selectbox būtų galima nurodyti kiekį (gal padėtų subform?). Pvz, pasirenkame "Nematoda" ir "Scorpiones" iš sąrašo ir norėčiau nurodyti, kad vieno yra 5, o kito 2. O pats esminis dalykas - kad toks įvedimas duomenų bazės lauke atrodytų būtent: 5*Nematoda, 2*Scorpiones.

     

    Screen'ai:

     

    http://www.accessforums.net/attachment.php?attachmentid=20907&d=1433331330

    http://www.accessforums.net/attachment.php?attachmentid=20908&d=1433331355

     

    Jei yra gerai išmanančių "MS Access" ar žinančių, kaip išspręsti problemą, galimas tam tikras sutartas uždarbis.

     

    P.S. būtų galima perkelti temą į: https://uzdarbis.lt/f109/it-darbo-pasiulymai/

  2. Išmokimui ir taip turiu pakankamai darbo :) Laiko nedaug, o nulio gauti nesinori... (Žodžiu, šįkart rūpi tik pliusą užsidėti - tenka tai pripažint). O rašiau BŪTENT čia, nes ieškau konkrečios pagalbos, už kurią galėčiau atsilyginti, bet ne nuorodų į kitus tinklalapius, kuriuos pats žinau.

  3. Sveiki, turiu užduotį, kurią reikia padaryti skubiai, naudojant C kalbą, bet nesugalvoju tinkamo algoritmo. O ji atrodo taip:

     

    Paskaičiuoti K!, kur K įvedamas skaičius. Rezultatą kaupti M=1000 dydžio masyve. Perspėti, jei

    paskaičiuotas skaičius netilps į masyvą.

     

    Naudoti dinaminę atmintį. Esmė: reikia sugalvoti, kaip dauginti skaičius, kurie peržengia leistinus rėžius. Tiems, kas parašytų programą, atsidėkočiau. Kontaktai: skype: martixz

  4. Galima daug knygų vardyti... Tiesiog paminėsiu vieną, kurią neseniai perskaičiau ir kuri man paliko gilų įspūdį apie skaudžią realybę. Taigi ta knyga vadinasi Džudas Nepastebimasis (Raidė žudo) ir priklauso Tomui Hardžiui, anglų klasikui. Romane pasineriama į keleto veikėjų susipynusį pasaulį, rafinuotu stiliumi perteikiami dviejų žmonių santykiai, valdomi tai beribių jausmų, tai proto, tai pareigos ar religinio dogmatizmo. Pagrindinės temos, nagrinėjamos kūrinyje: meilė, gyvenimo prasmė, pareiga, religija, socialinis absurdas...

  5. Sveiki. Naudoju Google Chrome naršykle ir iškilo šiokia tokia problema. Kai paspaudžiu ant nuorodos į failą, man iš karto pradeda siųsti jį. Nustatymuose nustačiau, kad leistų pasirinkti kur išsaugoti, bet ar negalima to failo tiesiog atidaryt neišsaugojant (nervina, kai prisikaupia daug nereikalingų failų siuntimų kataloge)? Ačiū už patarimus.

  6. Nusistatai du kintamuosius(krumynas, switch) su reikšmėmis lygiomis nuliui.

    Į masyvą „darzas“ susigrūdi savo lysves.

    ['110110110111','100010010111','111011010011']

    Darai loop'ą(pavadinkime jį No.1) kiekvienam savo masyvo elementui.

    Tame No.1 darome kitą loop'ą, kuris eina per kiekvieną skaičių(krūmą) eilutėje.

    Jame patikriname ar krūmas nelygus switch kintamajam.

    Jei sąlyga įvykdyta, mes switch prilyginam krūmui (switch = krumas)

    Tada patikriname ar switch lygus vienam(sveikas krūmas)

    Jei sąlyga įvykdyta, mes pridedame vieną krūmyną prie krumynas kintamojo.

    Na dabar gal šiek tiek aiškiau, bet ne iki galo. Turbūt tu orientuojiesi kitomis programavimo kalbomis. Beje, skyriaus pavadinimas, kuriame yra šis uždavinys, yra Rekursija. Vargu ar išeis čia ją kur nors panaudot, bet apskritai būčiau laimingas, kad ir be jos pavyktų padaryt.

  7. Kodo nerašysiu, kadangi jį turi parašyti pats, bet matomai nerandi būdų tai padaryti, todėl pasakysiu :

    kurmynas = 0

    switch = 0

     

    for lysveje array(darze)

    for krumas str(lysveje)

    if krumas ne= switch

    switch=krumas

    if switch == 1

    krumynas+=1

    endif

    endif

    endfor

    endfor

    ir taip per visas eilutes. Jokios rimtos sintaksės čia nenaudojau, tad kaip kodą jį vargu ar panaudosi, čia tau tik idėja kaip tai padaryti.

    Žinok nieko nesupratau, ne tik sintaksės atžvilgiu, bet ir pačios minties.

  8. Nu tada pagal sita pavizdi iseina, kad kiekvienoi lysvei yra po 4 krumynus, tada atsakymas turetu but 12, nes per 3 lysves bus po 4 krumynus. Galbut cia reik suskaiciuot kiek kiekvienoi lysvei liks krumynu, bet tada kyla klausimas ar visada bus tiek pat krumynu visose lysvese ?

    Čia JPM uždavinys. Jie kaip visalaik pateikia tokias "aiškias" sąlygas, bet faktas, kad atsakymas 4. Turbūt reikia žiūrėti kiek lysvių gaunasi išilgai, nes ar gali būti dar kitaip gaunama 4.

  9. Sveiki, gal galėtumėt padėti dėl programavimo PASCAL uždavinio?

     

    Sąlyga tokia:

     

    6. Senelis augina rožes. Jo gėlyną sudaro n lysvių, kuriose auga po m rožių krūmų. Deja, senelis pamiršo nupurkšti rožes skiediniu, apsaugančiu nuo ligų, ir kai kurie krūmai užsikrėtė. Juos teks išrauti. Tai padarius visas gėlynas gali suskilti į mažesnius įvairaus dydžio bei formos rožių krūmynus.

    Parašykite: a) sprendimo idėją ir

    b) programą, randančią kiek dabar yra atskirų rožių krūmynų.

    Pradiniai duomenys įrašyti faile duom.txt. Pirmoje failo eilutėje atskirti tarpu įrašyti du natūralieji skaičiai n ir m (1 ≤ n ≤ m ≤ 100). Likusiose n eilučių įrašyta po m neatskirtų tarpais nulių arba vienetų: 0 rodo, kad šioje vietoje rožių krūmo nėra, 1 – yra.

    Rezultatas – rožių krūmynų skaičius – įrašomas į failą rez.txt.

    Pradinių duomenų ir rezultatų pavyzdys

     

    Pradiniai duomenys Rezultatai Paaiškinimas

    3 12

    110110110111

    100010010111

    111011010011 4 11 11 11 111 Matyti, kad yra 4 rožių krūmynai.

    1 1 1 111

    111 11 1 11

     

    Būčiau nepaprastai dėkingas tam, kas padėtų parašyti programą šiam uždaviniui.

  10. Parašykite programą, kuri ekrane spausdintų kiekvieną klaviatūra renkamo teksto žodį (žodis sudarytas iš ne daugiau kaip 20 simbolių sekos, tarp jų nėra tarpo simbolių) ir iš karto po jo spausdintų tą žodį atbulai (atbulo žodžio spausdinimas vyksta teksto įvedimo metu!). Žodžiai vienas nuo kito skiriami vienu tarpu, teksto skaitymas iš klaviatūros baigiamas paspaudus įvesties klavišą.

    Reikalavimas. Uždaviniui išspręsti programoje turi būti panaudota rekursinė procedūra. Negalima naudoti struktūrinių ir dinaminių duomenų tipų.

    Pavyzdys:

    Aš šA rašau uašar programą. .ąmargorp :) ):

     

    Gal galėtumėt padėt? Iki penktadienio 24:00 reikia padaryti.

  11. Viskas kaip ir aišku, tik vieno dalyko nesupratau:

    if min = 0 then min := i;

    Skaičius yra iš reikiamo skaičiaus skaitmenų ir jo suma atitinka norimą. Pagal ką remiantis nustatoma, ar tas skaičius min ar max? Min pradžioje ir buvo nulis, o čia tikrinama, ar jis nulis, tai nulis ir bus, kaip kitaip gali būt? To kintamojo min lyg ir niekur prieš tai nekeičiame. Kaip tai reikia suprasti?

  12. Dėkui, kad nepatingėjai. Tiesa, pabandžiau paleist ir nesuranda teisingai pvz su k = 4; s = 6.

    program KTU_skaičiai;
     type mas = array[1..10] of integer;
    
     var k, s,
           iki_kiek, nuo_kiek,
           i, o, p, g, //kintamieji ciklams ir pan.
           max, min, sum,
           nuo_kiek_sk: longint;
           sk: mas;
           bool: boolean;
           df: text;
           nsk: mas;
    begin
     readln(k, s);
     max := 0;
     min := 0;
    
     //Sužinome, nuo kokio skaičiaus iki kokio darysime ciklą
     iki_kiek := 1;
     for i := 1 to k do
       iki_kiek := 10 * iki_kiek;
     nuo_kiek := iki_kiek div 10;
    
     //darom cikla ir brute-forciname
     for i := nuo_kiek to iki_kiek - 1 do
       begin
         o := 1;
         bool := TRUE;
         nuo_kiek_sk := i;
           //gauname visus skaičiaus skaitmenis
           while nuo_kiek_sk > 0 do
             begin
               nsk[o] := nuo_kiek_sk mod 10;
               nuo_kiek_sk := nuo_kiek_sk div 10;
               o := o + 1; //pridedame vieneta
           end;
    
           //Patikrinam, ar visi skaitmenys skirtingi
           for p := 1 to k do
           for g := p+1 to k do
                   if sk[p] = sk[g] then bool := FALSE;
    
           //Jeigu skirtingi, bool bus TRUE ir tikrinam sumą
           if bool then
             begin
               sum := 0;
               for p := 1 to k do
               sum := sum + sk[p];
    
               if sum = s then
                 begin
                   max := i;
                   if min = 0 then min := i;
                   end;
           end;
           end;
    
     if min > 0 then writeln(min, ' ',max)
     else writeln('Nėra');
     Readln;
    end.

  13. Gaist laika teks bet kokiu atveju, nes paskalis bent jau kolkas reikalingas mokyklose. Aisku tai neliecia tu kurie mokyklose nebesimoko.

    Teisingai. Aš mokausi 11 klasėje, taigi egzaminą laikyti teks. Paskalis labai gera priemonė sukt galvai ir susidaryt programuotojo nuovoką bei konstruktyvų mąstymą. Beje, mokausi taip pat ir C, C++...

×
×
  • Pasirinkite naujai kuriamo turinio tipą...