Pereiti prie turinio

MiniPixeL

Patvirtinti nariai
  • Pranešimai

    886
  • Užsiregistravo

  • Lankėsi

  • Laimėta dienų

    3
  • Atsiliepimai

    100%

MiniPixeL Pranešimai

  1. Mane tai labiausiai sunervino, kad nebuvo tokių klausimų, kuriuos du metus mintinai mokemės (fukcinis stilius ir argumentuoti, kodėl jis toks turinio ar formos atžvilgiu; kalbinis savitumas; meninė raiška; adresatas/adresantas; kalbėjimo tonas, idvidualusis stilius; įtaigumas). Už tokius klausimus galėjom užsidirbti daug lengvų taškų, o dabar viską reikėjo iškapstyti, išmąstyti - daug sunkiau, tad paprieštaraučiau tiems, kurie sakė, jog teksto suvokimas lengvas.

     

    Aš irgi būtent dėl to nepritariu, kad lengvas. Gerai, kad bent metaforas išrašyt buvo. O šiaip - nelengvas, tiesiog gerai, kad tik vienas tekstas ir gan greit ėjo atsakyt, kad ir neteisingai. :)

     

    Geriausiai nesirenki interpretacijos ir nereikia nei nusirašinėti nei atmintinai mokytis... :)

     

    Tiesiog anksčiau mažai kas interpretacijas rašė, tad jas kažkaip atlaidžiau vertindavo. Bet manau, kad šiemet taip nebebus. ;)

  2. Na va diablom čia ganėtina nusmukdė VGTU mano akyse. Nors redvel minėjo, kad lygiai panašūs. Taigi diablom būtų įdomu išgirsti kokiam fakultete mokais? Kaip matot balsavime laimi VU, nors ir nežymiai. :) Bet dabar jau galutinai jį atmečiau. Lieka rinktis KTU - VGTU. :)

     

    P.S. Arius, ačiū už pasiūlymą, bet netraukia tai, nors barakai tai labai patraukliai atrodo. ;)

  3. Aha, man tai mokytoja svaigo, kad tikrai bus klausimas kokiam funkciniam stiliui priklauso tekstas, bet visa laime, kad nebuvo :)

     

    Koks čia gerumas? Iš tokių klausimų, kuriuos galima išmokt, taškų lengviausia prisirinkti. Juolab, kad jau kitokio teksto kaip iš publicistinio stiliaus ir nebededa, tai gali užsimerkęs atsakyt. Bet nesitikėjau šito klausimo, nes tuos lengvuosius (žanras, funkcinis stilius, literatūros rūšis, tema, problema ir pan.) tai tik į mokyklinius bededa. Dėl autorių spėliojimo, nesivarginau, nes interpretacijos nė karto gyvenime nerašęs, tai žinojau - kokia pirma tema bus, tokią ir rašysiu (nes antroji su ištraukom visad nesąmoninga būna ;) ). Na ir visai neblogai sekės. O teksto suvokimas pakankamai trumpas pasirodė, bet klausimai tai nei į tvorą nei į mietą, paskutiniai ypač.

     

    Beje, rimtai koks tikslas laikyt mokyklinį? Aš suprantu, jei vos vos 4 išeina, tai mokytojai net neprileistų. Bet jei nors 5-6 turi, tai tiesiu taikymų į valstybinį. 1% valstybinio visuose universitetuose, duoda daugiau balų nei 10-kas iš mokyklinio. O tuo labiau, kad perlaikyt galima, na gal ir šiek tiek nemalonu perlaikyt, bet koks skirtumas, kas ką pagalvos? :)

     

    Oho kaip greitai straipsnis pasirodė :)

    Tai turbūt todėl, kad 15 minučių. :)

  4. Sveiki, taigi turiu uzdavinuka is simboliu eilutes pasalinti reikia zodzius kurie prasideda tam tikra raide. Bandau daryt sitaip: tikrinu kiek viena simboli ir jeigu jis yra ta raide, kuria reikia pasalinti, ir pries ji yra tarpas, tuomet is nasivo salinu elementus iki sekancio tarpo, taciau kazkodel sitas mano metodas neveikia. Gal turit kas nors pasiulymu? Idomu butu pasiziureti jusu parasytus pavyzdzius.

     

    Tai gal įdėk kodą, pažiūrėsim kodėl neveikia. Nes idėja tai pakankamai gera. :)

  5. Kam tu tą if dar įkišai? Veikia:

    program pirminiai;
    var x, p : longint;
     ats : boolean;
    
    function pirminis(p : longint) : boolean;
    var d, sn : longint;
    begin
     pirminis := (p mod 2 <> 0) or (p = 2);
     sn := round(sqrt(p)+1);
     d := 3;
     while pirminis and (d < sn) do
      if p mod d = 0 then
     pirminis := false
      else d := d + 2;
    end;
    
    begin
     for x := 1 to 10000 do
     begin
    p := sqr(x) + x + 17;
    if not pirminis(p) then
      Writeln('Formulė neteisinga, kai x=',x);
     end;
     Writeln('Formulė teisinga');
    end.

     

    Bet iš esmės labai jau daug skaičių netinka, tai manau, kad ne taip tereikėjo spręst. :)

  6. Juokingai graudu, programa jau 5 minutes skaičiuoja rezultatą:

     

    program pirminiai;
    var x, p, i, s, ats : longint;
    function pirm (p, i, s : longint; var ats : longint): longint;
    begin
    ats := 1;
    if ats = 1 then
     begin
      for i := 1 to p do
    begin
     if p mod i = 0 then s := s + 1;
    end;
    if s = 2
     then ats := 1
     else ats := 0;
     end;
    pirm := ats;
    end;
    begin
    s := 0;
    for x := 1 to 10000 do
     begin
      p := sqr(x) + x + 17;
      ats := pirm (p, i, s, ats);
     end;
    if ats = 1 then writeln ('true');
    if ats = 0 then writeln ('false');
    end.

    Įmanoma ją sutvarkyt, kad greičiau veiktų ar nelabai? :)

     

    Nelabai suprantu, kaip tavo funkcija veikia. Naudok Eratosteno rėtį. Tai greičiausias būdas. :)

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