Выполнение практических заданий с использованием символьных величин Урок 6.

ПРИМЕР: VAr S : string; x : integer; x : integer;Begin read(s); read(s); While pos('w',s)<>0 do While pos('w',s)<>0 do Begin Begin x:=pos('w',s); x:=pos('w',s); Delete(S,x,1) Delete(S,x,1) end; end; Writeln(S); Writeln(S);end. ЗАДАНИЕ: Дана строка, Удалите из нее все символы 'w.

Задача 1 Дана строка. Удалите из нее строчные буквы «о». Дана строка. Удалите из нее строчные буквы «о». Строка из русских букв. Строка из русских букв. ……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….

Задача 2 (сам*) Дана строка. Удалите из нее ВСЕ буквы «о». Дана строка. Удалите из нее ВСЕ буквы «о». Строка из смешанных букв букв (строчных и заглавных). Строка из смешанных букв букв (строчных и заглавных). ……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….

Решение задачи: Var S : string; x : integer; x : integer;Begin read(s); read(s); While pos(o',s)<>0 do While pos(o',s)<>0 do Begin Begin x:=pos('w',s); Delete(S,x,1) x:=pos('w',s); Delete(S,x,1) end; end; While pos(О',s)<>0 do While pos(О',s)<>0 do Begin Begin x:=pos('w',s); Delete(S,x,1) x:=pos('w',s); Delete(S,x,1) end; end; Writeln(S); Writeln(S);end.

ПРИМЕР:ЗАДАНИЕ: Дана строка, Замените у нее все символы 'w на *. ПРИМЕЧАНИЕ: ЗАМЕНА символа сводится к: - удаление символа - удаление символа - вставка нового символа - вставка нового символа Var S : string; x : integer; x : integer;Begin read(s); read(s); While pos('w',s)<>0 do While pos('w',s)<>0 do Begin Begin x:=pos('w',s); x:=pos('w',s); Delete(S,x,1); Delete(S,x,1); Insert('*',s,x); Insert('*',s,x); end; end; Writeln(S); Writeln(S);end.

Задача 3 Дана строка. Замените все буквы «о» на «*». Дана строка. Замените все буквы «о» на «*». Строка из русских букв. Строка из русских букв. ……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….

Задача 4 (сам.*) Дана строка. Замените все буквы «о» на «*». Дана строка. Замените все буквы «о» на «*». Строка из смешанных букв. Строка из смешанных букв. ……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….……………………………………….

Домашнее задание: §6, упр.7 (а,в). §6, упр.7 (а,в).