БЛОК-СХЕМА К КОДУ
P.S А МОЖЕТ ПРОГА СУЩЕСТВУЕТ, Чтобы все по волшебному нажатию кнопочки делалось???
Var
I: Integer;
S: String;
Begin
ReadLn(S);
I := 1;
while I <= Length(S) do
begin
if S = '*' then
Delete(S, I, 1)
Else
Begin
Insert(S, S, I + 1);
I := I + 2;
end;
end;
WriteLn(S);
ReadLn;
end.
Даны натуральное число n и символы S1, …, Sn (строка). Преобразовать строку, удалив каждый символ ‘*’ и повторив каждый символ, отличный от символа ‘*’.
Цитата: ice_lady
P.S А МОЖЕТ ПРОГА СУЩЕСТВУЕТ, Чтобы все по волшебному нажатию кнопочки делалось???
разумеется, существует. попробуйте чуть-чуть напрячь мозг и придумать волшебное словосочетание для поиска в гугле.
а вообще - нарисовать блок-схему для такого кода - вопрос пяти минут. неужели настолько тяжело осилить?
Учитывая капс в тексте, то я думаю, что осилить будет тяжело.