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

Question

Информатика

Гаря

24 октября, 20:38

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

+5

Ответы (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.