\documentclass[
answers,12pt
]{exam}
\usepackage{environ,xparse}
\usepackage[
a4paper,
left=1in,
right=0.8in,
top=1in,
bottom=0.8in,
headheight=\baselineskip,
%headsep=4mm,
%footskip=13mm,
%footskip=5mm,
]{geometry}
%%---------------------------------------------------------
\ExplSyntaxOn
\cs_undefine:N \choices
\cs_undefine:N \endchoices
\NewEnviron{choices}{%
\par\nopagebreak
\harish_dochoices:V \BODY
\par
}
\tl_new:N \l_harish_choices_tl
\seq_new:N \l_harish_choices_seq