program p1;var n,i,p,s:longint;begin readln(n); s:=0;p:=1; repeat i:=n mod 10; n:=n div 10; if i mod 2=0 then p:=p*i else s:=s+i; until n=0; writeln(p); writeln(s);end.
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile disponibile v-au fost utile și inspiraționale. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, suntem aici pentru a vă ajuta. Ne face plăcere să vă revedem și vă invităm să adăugați site-ul nostru la favorite pentru acces rapid!
