Ответы на вопрос:
uses crt; var s: string; beginwriteln('напишите слово'); readln(s); if (length(s) mod 2 = 0) then begin writeln('четное кол-во'); end else writeln('не четное'); end.
Популярно: Информатика
-
Сергей001326.08.2020 05:21
-
seksi250508.09.2022 10:19
-
Oremi02.07.2021 19:37
-
КучеренкоИнна02.04.2021 14:52
-
ayazhankadyrov2405.05.2022 06:58
-
kamilamirov77720.07.2022 10:56
-
zenafedorinova12.04.2022 01:16
-
pilel27.09.2020 00:43
-
Kamilena201027.02.2021 00:58
-
Qocharian18.03.2021 22:18