👤
NIKUBUZUKZE
a fost răspuns

un program Pascal va rog.
se da un text si o litera sa se creeze un program daca litera data se contine in textul dat in caz afirmativ sa se afiseza prima pozitie a literei altfel mesajul corespunzator

Răspuns :

FACEBOOKAUGUSTIZE
Program Augustin;
var
l,t:string;
i,s:integer;
begin
Writeln('Introdu textul'):
readln(t);
Writeln('Introdu litera');
readln(l);
for i:=1 to length(t) do
begin
if t[i]=' ' then s:=s else s:=s+1;
if t[i]=l then Writeln('Litera introdusa se afla pe pozitia ',s,' in text');
end;
readln;
end.
Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că informațiile prezentate v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de ajutor, nu ezitați să ne contactați. Vă așteptăm cu drag data viitoare și vă încurajăm să ne salvați în lista de favorite!


Ze Questions: Alte intrebari