Hujaev01
30.11.2020 23:25

C. носки ограничение времени 1 секунда ограничение памяти 64mb ввод socks.in вывод socks.out у программиста васи время от времени случается загадочная аномалия: свои носки он всегда кладет в стиральную машину парами и потом тщательно развешивает стиранные вещи на вешалку, но когда он снимает высушенную одежду с вешалки, выясняется, что носки далеко не всегда можно собрать в пары. то, кажется, потерялся некий носок, то какой даже постирался, какой не должен ничего не понятно. чтобы меньше пропадало носков, вася пытается покупать побольше одинаковых, но все равно происходит путанница. вася решил вести учет стирки носков. каждый новый носок вася помечает кодом - последовательностью заглавных латинских букв длиной от 2 до 15 символов. два одинаковых носка помечаются одной и той же последовательностью. после очередной стирки и сушки, пары по два одинаковых носка (помеченные одинаковой последовательностью) складываются вместе и убираются в шкаф. а вот оставшиеся непарные носки складываются в специальный пакет. после каждых четырёх стирок содержимое пакета перебирается, сформировавшиеся пары убираются в шкаф. а вот оставшиеся в пакете носки выбрасываются. напишите программу, которая по имеющимся высушенных в результате каждой стирки носков, определяет сколько носков вася выбросил. формат ввода входной файл socks.in в первой строке содержит количество стирок - натуральное число не превосходящее 400. каждые следующие две строки описывают одну стирку. первая из двух таких строк содержит количество носков (не более 200), обнаруженных после стирки и сушки, а вторая - коды носков через пробел. формат вывода в выходной файл socks.out вывести единственное число - количество выброшенных носков.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
555555Эвелина
25.04.2022 02:54
Var
a:array[1..5] of integer;
i,Max,c,n,f:integer;
 procedure ho;
 begin
       if a[i]>Max then
        begin
         Max:=a[i];
         c:=i;
        end;
 end;

 begin
   for i:=1 to 5 do
     begin
       a[i]:= random(15)+2;
       write(a[i],' ');
     end;
     Max:=a[1];
     c:=1;
     for i:=1 to 5 do
      ho;
      writeln;
      writeln('Максимум: ',max);
       f:=c;
                    if f=1 then
                    begin
                     max:=a[2];
                     for i:=2 to 5 do
                      ho;
                      writeln('Вторичный максимум: ',max);                                            exit;
                    end;       
                           if f<5 then
                      begin
                          Max:=a[f+1];
                          for i:=f+1 to 5 do
                          ho;
                          n:=max;
                       end;
                    if f>1 then
                      begin
                          Max:=a[1];
                          c:=f;
                          for i:=1 to c-1 do
                          ho;
                          if max>n then
                          writeln('Вторичный максимумì: ',max);
                          if max<n then
                          writeln('Вторичный максимум: ',n); 
                                               end;
   end.
0,0(0 оценок)
Ответ:
sergeevan73
14.07.2020 18:49

План характеристики химического элемента

по его положению в периодической таблице элементов

1. Название химического элемента. Химический знак этого элемента.

2. Положение в периодической таблице (порядковый номер, номер периода (малый, большой), номер группы.

3. Металл или неметалл.

4. Высшая валентность в кислородных соединениях, формулы высшего оксида, соответствующего гидроксида или кислоты, характер их свойств.

5. Валентность в водородном соединении, формула летучего водородного соединения (для неметаллов).

В ответе ставим только номера пунктов плана.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота