Pascal :

var one,two,three,four:longint;
begin
  one:=100;
  two:=one+20;
  three:=two div 3;
  four:=three*3;
  writeln(one);
  writeln(two);
  writeln(three);
  writeln(four);
end.