Elaborati un program in pascal care va citi de la tastatura un sir de caractere(string). Afiseaza la ecran numarul de enunturi si numarul de cuvinte din acest sir.
var i,k,a:integer;s:string;b:array [1..10] of integer;beginreadln(s);a:=0;for i:=1 to length(s) doif s[i]='.' thenbegina:=a+1end;writeln(s,' Sunt ',a,' propoziti',' , ',length(s),' cuvinte.');end.
Vă mulțumim că ați vizitat platforma noastră dedicată Informatică. Sperăm că informațiile oferite v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Așteptăm cu nerăbdare să vă revedem și nu uitați să ne salvați în lista de favorite!
