var int : Integer; begin // Divide a primary integer by 2 - it discards the remainder int := 17 Div 2; Writeln('17 div 2 = ',int); end.