Между символами строки вставить символ «#»

@iceiceicee · Регистрация: 29.09.2015

Author24 — интернет-сервис помощи студентам

Входной файл INPUT.TXT содержит строку, состоящую только из латинских букв. Длина строки не превосходит 100.
В выходной файл OUTPUT.TXT выведите строку, полученную из исходной, путем вставки символа «#» между всеми ее буквами.( Ребят, хелпаните нубу, пожааалуйста, вам плюсик в карму))=)

@Sergio Leone · 29.09.2015, 23:48

Pascal

var s : string;
i:integer;
begin
ReadLn(S);
for i:=Length(S) downto 2 do Insert('#',S,i);
WriteLn(S);
end.

@iceiceicee · 30.09.2015, 00:04 **[ТС]**

Спасибо=)

@Joy · 30.09.2015, 00:37

Pascal

uses System.IO;
begin
  &File.WriteAllText('output.txt',System.string.Join('#',&File.ReadAllText('input.txt').ToCharArray.Select(c->c)));
end.

Между символами строки вставить символ «#»

Решение

Решение

@iceiceicee 0 / 0 / 0 Регистрация: 29.09.2015 Сообщений: 8
		1
	Между символами строки вставить символ «#» 29.09.2015, 23:40. Показов 5648. Ответов 3 Метки нет (Все метки) Входной файл INPUT.TXT содержит строку, состоящую только из латинских букв. Длина строки не превосходит 100. В выходной файл OUTPUT.TXT выведите строку, полученную из исходной, путем вставки символа «#» между всеми ее буквами.( Ребят, хелпаните нубу, пожааалуйста, вам плюсик в карму))=) 0

@iceiceicee 0 / 0 / 0 Регистрация: 29.09.2015 Сообщений: 8
	30.09.2015, 00:04 [ТС]	3
	Спасибо=) 0

	30.09.2015, 00:37