Есть ответ 👍

Напишите алгоритм для робота, закрашивающий клетки

237
479
Посмотреть ответы 1

Ответы на вопрос:

Gerfat347
4,8(29 оценок)

Результат: тмрро 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.

Популярно: Информатика