If 30/100 organisms are red (have a red phenotype), this only occurs if it has the qq allele, which has probability q². This implies that q² = 0.3, and q = √0.3 = 0.55.
The rest of the possible genotypes: pp, pq, and qp, would all result in a purple appearance, since p is the dominant allele.