Есть ответ 👍

Составьте программу, заменяющую "yes" на "no" в предложении. !

189
251
Посмотреть ответы 2

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


Var s: string; p: integer; begin s : = 'no or yes? '; if pos('yes', s) > 0 then begin p : = pos('yes', s); delete(s, p, 3); insert('no', s, p); end; end.

за первый ход перевернем первые 6 цифр получим 6 5 4 9 8 7 1 2 3

затем в получившимся ноборе перевернем последние 6 цифр получим 6 5 4 3 2 1 7 8 9 теперь в этой последоватильнасти перевернем первые 6 цифр и получим то что надо

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