Question

Написать программу заменяющую одну букву на другую и подсчитывающую сколько раз ее заменили. (Букву любую на любую другую)

Answer 1

Ответ:

var

ch:integer;

 s: string;

 i: byte;

 begin

 WriteLn('Введите строку: ');

 ReadLn(s);

 for i := 1 to Length(s) do

   if s[i] = 'a' then

     s[i] := 'o';

ch++;

 WriteLn('Полученная строка:');

 WriteLn(s);

 WriteLn(ch);

end.

Объяснение:

Answer 2

Конечно! Вот пример программы на языке Python, которая заменяет одну букву на другую и подсчитывает количество замен:

pythonCopy code
def replace_and_count(string, old_char, new_char):
    count = 0
    new_string = ""
    
    for char in string:
        if char == old_char:
            new_string += new_char
            count += 1
        else:
            new_string += char
    
    return new_string, count

# Пример использования программы
input_string = input("Введите строку: ")
old_letter = input("Введите букву, которую хотите заменить: ")
new_letter = input("Введите букву, на которую хотите заменить: ")

new_string, count = replace_and_count(input_string, old_letter, new_letter)
print("Новая строка:", new_string)
print("Количество замен:", count)

Программа принимает входные данные от пользователя: строку, букву, которую нужно заменить, и букву, на которую нужно заменить. Затем она проходит по каждому символу в строке и заменяет указанную букву, увеличивая счетчик при каждой замене. В результате программа выводит новую строку и количество замен.

Пример использования программы:

lessCopy code
Введите строку: Hello, world!
Введите букву, которую хотите заменить: o
Введите букву, на которую хотите заменить: a
Новая строка: Hella, warld!
Количество замен: 2

Помните, что это простой пример программы и не учитывает регистр символов или возможные ограничения ввода. Вы можете модифицировать программу, чтобы она соответствовала вашим требованиям.