Дано некоторое число если оно четное уменьшить его в 2 раза,написать программу

Question

Дано некоторое число если оно четное уменьшить его в 2 раза,написать программу

Answer 1

Program test; 
var a:integer;
 begin 
 read(a); 
if a mod 2 =0 then 
 a:=a div 2;   
write(a); 
end.

Comments

А можешь объяснить начиная со слова если а остаток 2???