Autorius Tema: Ka reiskia zenklas "+="?  (Skaityta 1114 kartus)

Neprisijungęs Casual

  • Naujokas
  • *
  • Įrašai: 1
  • Karma: +0/-0
    • Žiūrėti profilį
Ka reiskia zenklas "+="?
« Įrašytas: 2014-05-02 14:55:00 pm »
Sveiki, suradau viena koda pratimo, kuri dariau, ir ten pamaciau dar nematyta zenkla. Vietoj priskirimo (":=") buvo parasytas zenklas "+=". Bandziau ieskoti pats bet neradau nieko. Gal kas zino kas toks issireiskimas reiskia? Dekui uz pagalba :)

Cia kodas apie kuri kalbejau.
program batai;
uses Math;

type Tmas=array[1..100] of integer;

 procedure skaityk (var n, nM, nV : integer; var motK, motD, vyrK, vyrD : Tmas);
  var i, lytis, koja, dydis : integer;
      DF : text;
   begin
    assign(DF,'u1.txt');
    reset(DF);
    readln(DF,n);
    for i := 1 to n do
     begin
      readln(DF,lytis,koja,dydis);
      if (lytis=4) then
       begin
        nM += 1;
        if (koja = 1) then motK[dydis] += 1 else motD[dydis] += 1
       end
        else
         begin
          nV += 1;
          if (koja = 1) then vyrK[dydis] += 1 else vyrD[dydis] += 1;
         end;
     end;
   end;
   
 function poruSK (kaireKoja, desineKoja : Tmas) : integer;
  var i, k : integer;
   begin
    k := 0;
    for i := 1 to 100 do
     k += Min(kaireKoja[i],desineKoja[i]);
    poruSk := k;
   end;
 
 function atlieka(n,n2:integer) : integer;
  begin
   atlieka := n - 2*n2;
  end;
 
 var n, nM, nV : integer;
     motK, motD, vyrK, vyrD : Tmas;
     DF : text;
  begin
   skaityk(n,nM,nV,motK,motD,vyrK,vyrD);
   writeln(poruSk(motK,motD));
   writeln(poruSK(vyrK,vyrD));
   writeln(atlieka(nM,poruSk(motK,motD)));
   writeln(atlieka(nV,poruSK(vyrK,vyrD)));
   readln;
  end.

Neprisijungęs Modestas Vaitkevičius

  • Dalyvis
  • **
  • Įrašai: 2007
  • Karma: +57/-16
    • Žiūrėti profilį
    • Apie mane
Ats: Ka reiskia zenklas "+="?
« Atsakymas #1 Įrašytas: 2014-05-02 16:09:20 pm »
Puikus pvz butu kaip cia:

i = i + 1 identiska i++

i = i + 2 identiska i += 2

Manualai.lt Forumas

Ats: Ka reiskia zenklas "+="?
« Atsakymas #1 Įrašytas: 2014-05-02 16:09:20 pm »