Строковые переменные.Составить программу удваивающую каждую букву "б" в заданном тексте (например из слова "баобаб" должно получиться слово "ббаоббабб".)
РЕШИТЬ ЗАДАЧУ С ПОМОЩЬЮ Delphi 7.
Помогите...
Модераторы: Хыиуду, MOTOCoder, Medved, dr.Jekill
for i:= 1 to length(s) do
if (s='б') then s1:=s1+'бб' else s1:=s1+s;
if (s='б') then s1:=s1+'бб' else s1:=s1+s;
Искусство программирования - заставить компьютер делать все то, что вам делать лень.
Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.
Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.