plus assign

Smart pascal source code


var i := 1;

i += 2;
WriteLn(i);
i += i;
WriteLn(i);
i += 10 - i;
WriteLn(i);

var s = 'a';

s += 'b';
WriteLn(s);
s += '-' + s;
WriteLn(s);

var f := 1.5;

f += 2.3;
WriteLn(f);
f += f;
WriteLn(f);
f += 10.4 - f;
WriteLn(f);

{<<< RESULT - CONSOLE LOG >>>
-----------------------------
3
6
10
ab
ab-ab
3.8
7.6
10.4
-----------------------------
{<<<<<<<<< THE END >>>>>>>>>}

  var i = 0,  s = "", f = 0; i = 1;
  i+=2;
  WriteLn(i);
  i+=i;
  WriteLn(i);
  i+=10-i;
  WriteLn(i);
  s = "a";
  s+="b";
  WriteLn(s);
  s+="-"+s;
  WriteLn(s);
  f = 1.5;
  f+=2.3;
  WriteLn(f);
  f+=f;
  WriteLn(f);
  f+=10.4-f;
  WriteLn(f);