Ответы на вопрос:
Var s,s1: string; i: integer; begin read(s); for i: =length(s) downto 1 do s1: =s1+s[i]; writeln(s1); end.
Популярно: Информатика
-
666Лиза6661125.12.2021 18:30
-
Elizzzavettta09.06.2021 22:55
-
ilyfghjjjh05.05.2022 07:05
-
daria003ss218.07.2021 17:36
-
РускийЧатик17.08.2022 09:12
-
zagidsadikov17.05.2022 22:16
-
sassshaaa21.04.2022 18:07
-
elena56302.03.2022 00:32
-
Velichkovskaya12.05.2021 08:04
-
13Улька1104.02.2022 18:36