... i, jbyteBeginrite a readlnarite i readlnirite j readlnjBcopya ,I , jritelnbEnd.Functia pos are rolul de a verifica daca un sir este subsir pentru altul. Function possubsir,sirstring byteProgramul urmator citeste 2 siruri a si b si verifica daca b este subsir al lui a.In ambele cazuri se dau mesaje.Program s2 Var a, b string NintegerBeginrite a readlnarite b readlnbnposb,aif n0then riteln b nu este subsir al lui a else riteln b este subsir al lui a si incepe in pozitia ,nend.Procedura insert are rolul de a insera un sir de caractere incepind cu o anumita pozitie,inalt sir. Procedure insert sirsdesins string var sirsundesinsstring poz integersirsdesins sirulcare urmeaza a fi inseratsirsundesins sirul in care se face inserareapoz pozitia din care se face inserarea.Program s3Var a, b stringBeginrite a readlnarite b readlnbInsertb, a, 3ritelnaEnd.Procedura delete are rolul de a sterge un subsir din cadrul unui sir dat. Procedure deletevar sirstring indice ,nrscar integerProgramul urmator citeste un sir de caractere intr-o variabila de tip string ,numita a. Program s4Var astringBeginriteareadlnaDeletea, 3, 2End..iFvzivjtvtPh1iii55CJa5CJ5CJCJ5CJ.zizàJxiii11
F1VXbaBpjtvPBFFBNia01i11F 1h à!ia8i8NormalCJsHaJmHsHtHAiDefault Paragraph FontBaBody TextaJ1 uvAaaaOaiaaaaaaaaa1QRq5XCDaaa030000000 00000000000000000000 0000000000000000000 00 0 0 00000000000 000000000...
Download