Является ли любая информационная среда коммуникационной? да нет да,если общение происходит при канала связи
190
315
Ответы на вопрос:
Var s : string; i, k : integer; begin readln(s); k: =0; for i : = 1 to length(s) div 2 do if s[i]= s[length(s)-k] then k: =k+1; if k= length(s) div 2 then write('полиндром') else write('не полиндром'); readln end.
Популярно: Информатика
-
ktlwfh23.01.2021 19:01
-
xato200310.07.2022 22:40
-
JANAOOP2922.01.2023 20:13
-
mavlud11112.02.2023 14:19
-
Krosarik10.05.2021 15:49
-
Nastena10200230.01.2021 21:44
-
mada465308.07.2022 06:10
-
FullDown11.03.2021 09:04
-
Валерыч200501.06.2020 18:55
-
Кира1110101016.07.2022 07:53