Question

Elaborați un program pascal care va determinat na numărul de apariții a silabei "ma" într-un sir​

Answer 1

Răspuns:

program aparitii_ma;

var s:string;

   n,i,ap:integer;

begin

 write('Dati sirul de caractere: ');read(s);

 n:=length(s);

 ap:=0;

 for i:=1 to n-1 do

     if (s[i]='m')and(s[i+1]='a') then inc(ap);

 writeln('nr. de aparitii a silabei ma este ',ap);

end.

Explicație:

Se caută ma, care e diferită de Ma sau MA