Все, что напечатано или написано на любом из существующих языков, относится к ...
170
213
Ответы на вопрос:
var
s: string;
n: integer;
begin
readln(n);
readln(s);
for i: =1 to n do
if (s[i]='.') then delete(s,i,1)
else insert(s[i],s,i);
writeln(s);
end.
Популярно: Информатика
-
Антонио78917608.11.2020 22:33
-
skymiss07.05.2022 20:55
-
nastyakulikova509.03.2021 05:41
-
nastialeon18.06.2020 16:29
-
strelchyksofia2000503.04.2022 01:26
-
Vvvpp05.03.2022 01:45
-
ТЕМА323207.04.2023 21:23
-
Ultranet25.09.2022 16:49
-
AngelinaMon117.04.2022 16:07
-
Нуб000130.03.2021 13:11