Дана строка . удалите из неё среднюю букву, если длина строки нечётная или две средних в противном случае. программа на паскаль
174
485
Ответы на вопрос:
Var s: string; begin readln(s); if odd(length(s)) then delete(s,length(s) div 2+1,1) else delete(s,length(s) div 2,2); writeln(s) end.
Желательно бы еще варианты ответов, но на основании этого получается,что (первая цифра больше второй) и (наименьшая цифра не равна 3)
Популярно: Информатика
-
OLEGator80011.08.2022 21:04
-
Anastasia622623.10.2022 07:54
-
naoimiiwsvb214.01.2021 19:00
-
arzanix08.03.2021 21:57
-
СанькаДьяченко04.05.2021 00:01
-
PicaChuShiK28.01.2020 07:45
-
lowrentij15.09.2021 14:58
-
сайнорбой03.04.2023 05:36
-
спроситьнадо18.06.2021 23:09
-
Jamalove28.05.2020 21:16