Турбо паскаль. какие числа можно получить при вычислении выражений: а. x mod 5, б. x div 5?

x mod 5

-4 -3 -2 -1 0 1 2 3 4  

x div 5

любое целое число от  -429496729 до  429496729 (если x - longint) или от -13107 до  13107 если х - integer

15 div 3 = 5; 18 div 5 = 3; 123 div 10 = 12, 7 div 10 = 0.

15 mod 3 = 0; 18 mod 5 = 3; 123 mod 10 = 3, 7 mod 10 = 7.

program pr;

var i: integer;

      mas: array[1..7]of integer;

begin

for i: =1 to 7 do 

begin

writeln ('введите температуру ', i ,' сентября');

readln (mas[i]);

end;

for i: =1 to 7 do writeln (i, '  сентября температура была  ' mas[i]);

readln;

end.

program zadacha6; var a,b: real; begin readln(a,b); if a> b then writeln (a) else writeln (b); end.

не? я не уверен