Question

ДАНО ТРЕХЗНАЧНОЕ ЧИСЛО.НАЙДИТЕ ПРОИЗВЕДЕНИЕ ИХ ЦИФР

Answer 1

var a: integer;

begin

   readln(a);

   write((a div 100) * (a div 10 mod 10) * (a mod 10))

end.