Sveiki, klausimas buu toks : kompiuteryje dabar yra Windovs Vista, ir jie turi licenzija (org), noriu juos perasyt i tuos pacius tik is linkomanijos parsiustus... Ar galesiu naujuose vindowsuose irasyt ta pacia licenzija ar tai koda, ir ka reiktu nusirasyt is senu ir kaip tai padaryt, dekui...

Citata iš: @BaRtEx@  2011  Liepos 05, 23:13:10

Gramatura tikrai normali, bet jokiu budu nepirk mono VALO!!! Uz 100 lt , gali nebloga kota ir turgui paimti, kad ir  pvz surf master... Kuom geriau pintas valas ? Ogi tuo kad jei ikabinsi i rimtas zoles, busi garantuotas , kad istrauksi masala, ko nepasakyciau apie mono vala... Plius betkokiu kotu gaudant, geriau jausi masala( ta prasme jis per dugna sliauzia ar plaukia).. Galau gale , zuvies pasipriesinimas bus smagesnis... Imk 0,12 ar 0.14 ir nesuk galvos , paprastas valas uz 30 lt.... Mono valas, eseriam gaudy, kad ir pvz dziginant per dugna, tam kad maziau zuvis baidytusi, dazniausiai naudojamas pavadelinis mono valas 0,12....

kiek zmoniu tiek nuomoniu....  cia bergzdios diskusijos... vienam tas patinka, anam kitkas.... visi zvejojam gi skirtingai...  aisku su pintu valu meti per zoles ir dzin, timtelejai ir ,,isejo: masalas is zoliu.. bet mano atveju pirkau climax pinta vala 55 lt. viena sezona panaudojus, antro sezono pradzioje jis man pasidare kai 0,1 stiprumo zilka, pist ligioi vietoi be mazgo trukinet pradejo... o ir kotas ne is pigiuju 180 lt simano catana, ir rituke tokia pat. O jausmas toks lyg ta vala butu sudroze ziedeliai ar rite, issiserpetojes jis toks, is zalios i balta sniura paliko. tai as geriau 3-4 ritinelius normalios zilkos nusiperku ir zvejoju daug ilgiau nei su pintuku. ir vienur ir kitur yra savi pliusai savi minusai. o ir as tik is valties su spiningu tegaudau, tai man ir uzkabinus kliuvini nera sunku uzplaukt atsikabint.

Citata iš: @BaRtEx@  2011  Kovo 16, 16:13:34

Gal kas susiduret su algoritmais??? Kuo toliau tuo didesnis miskas man... Gal kas galetu padet ar ant kelio uzvest ??? dekui
Kazkokia pradzia yra bet gal su duomenim supjoviau...
http://img717.imageshack.us/img717/3285/10348007.png

Su integer padariau, tyngiu zaist su dideliais skaiciais... Random parenka nuo 1 iki 100(pagamintu detaliu sk.). Mas1, mas2, mas3 tai kiekvienam cechui priskirtas detaliu kiekis pagal dirbtu dienu skaiciu. Sum1, sum2, sum3 tai detaliu pagamintu per N dienu suma,

Kodas: [Pasirinkti]

program Noname0;
var mas1 : array[1..3000] of integer;  //pirmos imones masyvas
mas2 : array[1..3000] of integer;  //antros imones masyvas
mas3 : array[1..3000] of integer;  //trecios imones masyvas
   n, i, sum1,sum2,sum3, min: integer;


Begin
 writeln('Iveskite dirbtu dienu skaiciu');
read (n); //dienu skaicius
begin
for i := 1 to n do
mas1[i] := random(100);
end;
begin
sum1:=0;
for i := 1 to n do
sum1:=sum1+mas1[i];
end;

begin
for i := 1 to n do
mas2[i] := random(100);
end;
begin
sum2:=0;
for i := 1 to n do
sum2:=sum2+mas2[i];
end;


begin
for i := 1 to n do
mas3[i] := random(100);
end;

 begin
sum3:=0;
for i := 1 to n do
sum3:=sum3+mas3[i];
end;

if sum1<sum2 then
  if sum1<sum3 then
  min:=sum1
    else
  min:=sum3
  else
  if sum2<sum3 then
  min:=sum2
  else min:=sum3;



 writeln('Pirmas cechas pagamino');
  writeln (sum1);
   writeln('Antras cechas pagamino');
   writeln (sum2);
    writeln('Trecias cechas pagamino');
    writeln (sum3);

    if min=sum1 then
  writeln('Maziausiai pagamino pirmas cechas')
    else
    if min=sum2 then
      writeln('Maziausiai pagamino antras cechas')
      else writeln('Maziausiai pagamino trecias cechas');


readln;
readln;

end.