Ответы на вопрос:
Var s: string; begin readln(s); for var i : = 1 to length(s) div 2 do write(s[i]); end.
Популярно: Информатика
-
handball23091205.11.2022 01:50
-
figakuvesi23.02.2020 03:28
-
MoDnIk23731.12.2021 17:16
-
kovalvladislavoxx9e605.05.2022 02:03
-
run555529.09.2022 01:24
-
руслан766117.04.2020 04:51
-
Артур1505150503.05.2022 13:36
-
merkurevamilena128.05.2022 05:21
-
Nurbakyt210316.04.2021 00:36
-
kristinavasina105.04.2022 02:39