題目描述 給出一個正整數N（1≤N≤100），即可得到一個由N 個正整陣列成的從1開始的如下數列：1，2，3，4，……N-2,N-1,N，且可求出從1開始的這N個數的全部各個數位上的數字之和。 例如：當N=12時，這12個數是：1，2，3，4，5，6，7，8，9，10，11，12。 則這12個數的數字之和為： S=1+2+3+4+5+6+7+8+9+1+0+1+1+1+2=51

輸入 一個整數N。

輸出 一個符合條件的整數。

樣例輸入 12 樣例輸出 51

滿分程式碼：
var
  i,cc,n,k:integer;
begin
  readln(n);
  cc:=0;
  for i:=1 to n do begin
    k:=i;
    while k>0 do begin
      cc:=cc+k mod 10;
      k:=k div 10;
    end;
  end;
  writeln(cc);
end.