n,zero - naturale
zero <- 0
citeste n
daca (n==0) zero<-1
cat timp (n>0){
daca (n%10==0)zero<-zero+1
n<-n/10;
}
scrie zero
n, sapte - numere naturale;
sapte <- 0
citeste n
cat timp (n>0){
daca (n%7==0)sapte<-sapte+1
n<-n/10;
}
scrie sapte
a,b,min - naturale
min<-10;
citeste a,b
cat timp (a>0){
daca (a%10<min)min<-a%10
a<-a/10;
}
daca (min==10) scrie 0
altfel scrie min
min<-10
cat timp (b>0){
daca (b%10<min)min<-b%10
b<-b/10;
}
daca (min==10) scrie 0
altfel scrie min