Example: doIt (Cont.)
‘b’,’B’: writeln(‘gcd, lcm
=‘, gcd(A, B), ‘,’, lcm(A,
B));
otherwise
writeln(‘Unknown
choice’);
end
end;