title: Convert real to Integer in loop in Pascal
body: <p>I'm new in Pascal and I don't know how a fix this error:
  Incompatible types: got "S80REAL" expected "LONGINT"</p>
  
  <p>My code is: </p>
  
  <pre><code>Var
  number1:Integer;
  a,b:Integer;
  a,i:Integer;
  
  procedure number(number1: Integer);
  begin
  a:=1;
  b:=number1+(number1-1);
    for a:=1 to number1 do
    begin
      for i:=1 to ((b-a)/2) do
      begin
      write('#');
      end;
    end;
  end;
  </code></pre>
  
  <p>Error is here:  <code>for i:=1 to ((b-a)/2) do</code></p>
  
  <p>Thank you for help. </p>