You need to drink less coffee, code_glitch

Anyway, to answer your last question about the variables. You're definitely going to need different variables to store the totals. However, it's also possible to get rid of some. For example you use a variable to check the value read and then use that variable to display the outcome. Why not do both at the same time? It saves code and makes the whole thing easier to read.
So instead of
Code:
pos:=numcheck>0;
do this
Code:
if (numcheck > 0) then writeln('This is a positive number');
Also, while I'm on the subject of variables. Try to have as few global variables as possible.
Any variable that isn't needed outside of a procedure should be declared inside. ie
Code:
procedure askNumber();
var numcheck : integer;
begin
   ...