Ответы на вопрос:
Для того, чтобы открыть любую папку на компьютере, необходимо:
1. Навести курсор на папку, которую вы собираетесь открывать
2. Дважды подряд нажать на левую кнопку мыши.
:
1. Навести курсор на папку, которую вы собираетесь открывать
2. Нажать 1 раз правой кнопкой мыши на папку
3. Навести на появившееся окно курсором и выбрать пункт "Открыть"
program rawtcherv;
function incpost(var i: integer): integer;
begin
result: =i;
inc(i);
end;
// из символов из входной строки составить палиндром с минимальным значением
function makeminpalindromemaxlength(const s: string): string;
var
a: array[1..9] of byte;
i,j,fino,cur,center: integer;
begin
fillchar(a{%h-},sizeof(a),0);
// вычисляем количество разных цифр, встреченных во введённой строке
for i: =1 to length(s) do
if s[i] in ['1'..'9'] then
inc(a[ord(s[i])-ord('0')])
else
break;
// максимальная длина палиндрома равна длине строки
cur: =1;
center: =-1;
setlength(result,length(s));
// составляем палиндром. в начало вставляем половину всех цифр от мин. к макс.
for i: =1 to 9 do begin
// поиск минимального числа, которое можно вставить в центр
if (a[i] mod 2=1) and (center< 0) then
center: =i;
// вставляем в начало строки половину символов
fino: =a[i] div 2;
for j: =1 to fino do
result[incpost(cur)]: =chr(i+ord('0'));
// оставшуюся половину вставим потом
a[i]: =fino;
end;
// вставляем центральный символ
if center> 0 then
result[incpost(cur)]: =chr(center+ord('0'));
// вставляем в обратном порядке символы палиндрома
for i: =9 downto 1 do begin
for j: =1 to a[i] do
result[incpost(cur)]: =chr(i+ord('0'));
end;
// восстанавливаем длину строки
setlength(result,cur-1);
end;
procedure test(const s: string);
var
s1: string;
begin
s1: =makeminpalindromemaxlength(s);
writeln('orig=',s);
writeln('pal =',s1);
writeln('diff=',length(s)-length(s1));
writeln;
end;
begin
test('9998888776665432111');
readln;
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
irko0002.06.2020 02:47
-
kirilsex6917.11.2020 16:43
-
VicktoriaGra13.01.2023 04:20
-
ТвойВраг28.02.2021 17:47
-
KSEN01207.10.2020 17:54
-
maryana07080327.11.2021 19:50
-
temirhanarmy21.09.2021 09:40
-
ГеральтИзРивии99912.12.2020 15:08
-
12345678212117.03.2022 06:31
-
bonusalixova25.12.2021 22:36
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.