Question

Se citește un număr natural, n, și se cere să se scrie NUMARUL DE CIFRE PRIME ale lui n.
Exemplu: dacă n=1233405, atunci se scrie numărul 4.

Answer 1

Răspuns:

program cifrePrime;

var n, nr, cif: integer;

begin

 read(n);

 nr:=0;

 while n>0 do

   begin

     cif:=n mod 10;

     if (cif=2)or(cif=3)or(cif=5)or(cif=7) then inc(nr);

     n:=n div 10;

   end;

 writeln(nr);

end.

Explicație: