Составьте программу, которая заменяет в строке s слоги "ма" на слоги "бу"

Question

Информатика

Валентин

31 марта, 06:48

Составьте программу, которая заменяет в строке s слоги "ма" на слоги "бу"

+3

Ответы (1)

Знаете ответ на вопрос?

Влас · Answer 1

Var n:string; t:integer; begin writeln ('Введите строку') ; readln (n) ; if pos ('ма', n) 0 then begin t:=pos ('ма', n) ; delete (n, t, 2) ; insert ('ва', n, t) ; writeln (n) end else writeln ('Такой слог в строке не найден') end.