Pereiti prie turinio

Rhymond

Patvirtinti nariai
  • Pranešimai

    1.212
  • Užsiregistravo

  • Lankėsi

  • Atsiliepimai

    100%

Rhymond Pranešimai

  1. Dėl to kad griefinimas, vogimas ir žudymas leidžiamas tai neidomu. Koks idomumas, kai pasistatai kanors, kita ryta prisijunges nieko neberandi? Arba dar jei turi pilna diamond prisikases o kasnors užmuša ir atima, o dar gražiau jei iš chesto pavogia. Tokiam serveryje tikrai nežaiščiau.

     

    [neįsižeisk bet..]

    Nebūk verksnys ;) tiesiog manau, jog kovok už save, taisyklės visiems vienodos. Tad eik ir kalk kitus žmones kurie turi prisikasę diamond ir naikink jų namus ;) Būk stiprus... Nepasiduok

    P.S. Nežaidžiu minecrafto

  2. program skaiciai;
    
    type    skaicius = -999..999;
    
    Var sk : skaicius;
    begin
     WriteLn('Iveskite skaicius: ');
     Readln(sk);
       if sk = 0 then WriteLn('Skaicius yra lygus 0')
                 else
       if sk > 0 then
                 begin
                   if sk < 10  then WriteLn('skaicius teigiamas vienazenklis');
                   if (sk < 100) and (sk >= 10) then WriteLn('skaicius teigiamas dvizenklis')
                               else WriteLn('skaicius teigiamas trizenklis');
                 end
                 else
                 begin
                   sk := sk * (-1);
                   if sk < 10  then WriteLn('skaicius neigiamas vienazenklis');
                   if (sk < 100) and (sk >= 10) then WriteLn('skaicius neigiamas dvizenklis')
                               else WriteLn('skaicius neigiamas trizenklis');
                 end;
       Readln;
    end.

     

    dar vienas sprendimo būdas:

     

    program skaiciai;
    
    type    skaicius = -999..999;
    
    Var sk : skaicius;
       st : string;
    begin
     WriteLn('Iveskite skaicius: ');
     Readln(sk);
       if sk = 0 then WriteLn('Skaicius yra lygus 0')
                 else
       if sk > 0 then
                  begin
                    str(sk, st);
                    WriteLn('Skaicius yra teigiamas ',length(st),'-zenklis');
                  end
                 else
                  begin
                     sk := sk * (-1);
                     str(sk, st);
                     WriteLn('Skaicius yra teigiamas ',length(st),'-zenklis');
                  end;
       Readln;
    end.

  3. neturiu prie ko prikibt dabar :)

     

     

    dabar va liuks, tik labai aki rezia ta balta spalva vidurinei panelei, nezinau kazkaip reiktu sugalvot kad maziau baltos spalvos ten butu ar atskirt visas paneles ar siuntinio fonas butu koks kitas kad kaip dabar yra ls-planet.info

     

    V3, padidinti pries žiurint

    post-36272-0-40665800-1324855133_thumb.png

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