Bob Anamaria

Cl a-XI-a C

Problema Se cieste de la tastatura un text de maxim 40 de

caractere sa se afiseze textul dupa interschimbareasilabei ‘oa’ cu silaba ‘ie’

Variabile text – este propozitia ce se introduce de la tastaura este

de tip string;

silaba1 – este silaba care trebuie identificata in cadrul propozitiei si este de tip string;

silaba2 – este silaba care va inlocui de silaba1 in propoziţie ;

P – poziţea silaba1 in cadrul propoziţiei

L – lungimea silabei1;

Pseudocod Se citeste textul de la tastatură:

Soarele scoate pe ogoare oamenii.

Se cauta pe ce pozitie e prima silaba ‘oa’ in cadrul textulcitit care se retine in variabila p.

Se sterge incepand cu pozitia p silaba ’oa’ Sa se adauge incepand cu pozitia p silaba ‘ie’

l:=2;

p:=2;

S rele scoate pe ogoare oamenii.

rele

p:=11;

1 2 3 4 5 6 8 9 10 1314 15 1617 1819 20 21222324 25 2627 28 29 30 31 32

Sierele sc te pe ogoare oamenii.

p:=11;

1 2 3 4 5 6 8 9 10 1314 15 1617 18 19 20 21222324 25 2627 28 29 30 31 32

Sierele sc te pe ogoare oamenii.

p:=21;

1 2 3 4 5 6 8 9 10 11 12 1314 15 1617 18 19 20 2324 25 2627 28 29 30 31 32

Sierele sciete pe og re oamenii

p:=21;

1 2 3 4 5 6 8 9 10 11 12 1314 15 1617 18 19 20 2324 25 2627 28 29 30 31 32

Sierele sciete pe og re oamenii

p:=26;

1 2 3 4 5 6 8 9 10 11 12 1314 15 1617 18 19 2021 22 2324 25 28 29 30 31 32

Sierele sciete pe ogiere menii

p:=26;

1 2 3 4 5 6 8 9 10 11 12 1314 15 1617 18 19 2021 22 2324 25 28 29 30 31 32

Sierele sciete pe ogiere menii

Textul dupa interschimbare este :

Sierele sciete pe ogiere iemenii.

Program PascalProgram silaba;var text,silaba1,silaba2:string;

l,p:integer;Beginwrite(‘text=‘);readln(text);write(‘silaba1=‘);readln(silaba1);write(‘silaba2=‘);readln(silaba2);l:=length(silaba1);P:=pos(silaba1,text);While p<>0 do Begin

delete(silaba1,p,l);insert(silaba2,text,p);p:=pos (sliaba1,text);

End;Writeln(‘textul dupa interschimbare este ’,text);Readln;End.