Thou shalt not put queries in loops (good example)

gistfile1.txt

List<Account> accList = new List<Account>(
    [Select 
        Id
        ,Name
        ,(Select 
              Email
          From
              Contacts
        )
     From Account]
);
 
for(Account acc : accList){
    Integer numWithEmail = 0;
    for(Contact cont : acc.Contacts){
        if(!String.isEmpty(cont.Email)){
            numWithEmail++;
        }
    }
}