determina nr total de litere 'a' si 'b' din textul dat (pentru sirul 'abracadabra' , k=7) acesta este un sir cu caractere S. realizati un program pascal
va rog frumos urgentt!!!
Program sirab; Begin var S:string; var i,lung,k:integer; writeln('Scrieti sirul de lungime:'); readln(S); lung:=length(S); k:=0; for i:=1 to lung do begin if (S[i]='a') OR (S[i]='b') then k:=k+1; end; writeln('Nr de caractere a,b:',k); 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!