Ответы на вопрос:
Var a, b, c: string; d: array of char : = (' ', ',', '.', '-', '! ', '? '); e: array of char; begin readln(a); foreach b in a.split(d, system.stringsplitoptions.removeemptyentries) do begin e : = b.tochararray(); system.array.reverse(e); write(string.create(e), ' '); end; end.
Популярно: Информатика
-
afa200409.06.2023 06:03
-
Skylordeg28.01.2023 09:48
-
ak951224.09.2020 07:17
-
grkhkt13.08.2022 21:30
-
Anytohka0cosmos25.04.2021 16:29
-
Никольнейв23.05.2022 05:25
-
YaroslavShevchuk12.06.2023 11:51
-
63003510.10.2021 11:32
-
LeXonG26.09.2020 17:06
-
katy5444507.07.2022 17:12