Ответы на вопрос:
Результат: тмрро const abc = 'абвгдеёжзийклмнопрстуфхцчшщъыьэюяа'; var s : string; function alg(ss : string) : string; var i : integer; begin if odd(length(ss)) then insert(ss[(length(ss) div 2)+1],ss,(length(ss) div 2)+1) else ss: ='с'+ss; for i: =1 to length(ss) do if pos(ss[i],abc)> 0 then ss[i]: =abc[pos(ss[i],abc)+1]; alg: =ss; end; begin { readln(s); writeln(alg(s)); } writeln(alg(alg('ком'; end.
Популярно: Информатика
-
frolikoffgrigory30.05.2023 11:54
-
lukianova20172016.05.2023 09:44
-
zhenyazhitenko29.05.2023 00:23
-
BlackVaiNor06.05.2021 02:48
-
Исма12423.11.2021 06:57
-
океекй24.06.2022 02:17
-
danil136533412.07.2022 02:44
-
SofiDu23.05.2022 23:19
-
linaaaa2Li18.09.2020 02:25
-
Gazizianov201804.02.2021 04:29