Есть ответ 👍

Спрограммой создать числовой файл f.получить файл g, в который записать сначала положительные,затем отрицательные и,наконец,нулевые компоненты файла f.файлы f,g распечать программу и по возможности блок схему буду

171
314
Посмотреть ответы 2

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

tony23
4,7(69 оценок)

// pascalabc.net 3.1, сборка 1204 от 24.03.2016 begin   var f,g: file of integer;   assign(f,'ffile.dat'); rewrite(f);   for var i: =1 to 30 do write(f,random(-20,20));   // файл f создан и заполнен   assign(g,'gfile.dat'); rewrite(g);   f.seek(0);   var e: integer;   print('f: ');   while not f.eof do begin       read(f,e); print(e);       if e> 0 then write(g,e)       end;   f.seek(0);   while not f.eof do begin       read(f,e);       if e< 0 then write(g,e)       end;   f.seek(0);   while not f.eof do begin       read(f,e);       if e=0 then write(g,e)       end;   f.close;   writeln;   print('g: ');   g.seek(0);   while not g.eof do begin       read(g,e); print(e)       end;     g.close end. тестовое решение: f: -14 15 -16 0 7 0 18 19 -12 -10 6 15 -19 -14 -15 -1 -6 -4 -20 12 10 4 3 16 -14 -20 3 10 -13 -16 g: 15 7 18 19 6 15 12 10 4 3 16 3 10 -14 -16 -12 -10 -19 -14 -15 -1 -6 -4 -20 -14 -20 -13 -16 0 0 данное решение неоптимально по времени, поскольку файл читается трижды. можно сделать иной вариант, читая данные за один проход и помещая в две структуры памяти отрицательные и нулевые элементы. // pascalabc.net 3.1, сборка 1204 от 24.03.2016 begin   var f,g: file of integer;   assign(f,'ffile.dat'); rewrite(f);   for var i: =1 to 30 do write(f,random(-20,20));   // файл f создан и заполнен   assign(g,'gfile.dat'); rewrite(g);   var n: =f.filesize;   var neg,zer: array of integer;   setlength(neg,n); setlength(zer,n);   f.seek(0);   var e: integer;   var ineg: =0;   var izer: =0;   print('f: ');   while not f.eof do begin       read(f,e); print(e);       if e> 0 then write(g,e)       else           if e< 0 then begin neg[ineg]: =e; inc(ineg) end           else begin zer[izer]: =e; inc(izer) end       end;   f.close;   writeln;   setlength(neg,ineg);   foreach e in neg do write(g,e);   setlength(zer,izer);   foreach e in zer do write(g,e);   print('g: ');   g.seek(0);   while not g.eof do begin       read(g,e); print(e)       end;     g.close end. тестовое решение: f: 7 5 -14 6 -11 -9 5 -1 5 -5 -7 -1 4 -20 17 -19 0 -3 0 6 20 1 -2 -18 9 20 0 -2 3 -13 g: 7 5 6 5 5 4 17 6 20 1 9 20 3 -14 -11 -9 -1 -5 -7 -1 -20 -19 -3 -2 -18 -2 -13 0 0 0

Шаг № 1. Добавляем номер на все страницы документа.

Если вам нужно пронумеровать все страницы документа Word, но без титульного листа, то первое, что нужно сделать это добавить номер на все страницы. В Word 2007, 2010, 2013 и 2016 это делается очень Нужно перейти на вкладку «Вставка» и нажать на кнопку «Номер страницы».

После того, как вы пронумеровали все страницы документа Word, вам останется только убрать нумерацию с титульного листа. О том, как это делается, вы узнаете из следующих шагов.

Шаг 2. Убираем нумерацию с титульного листа.

Теперь, можно убрать номер страницы с титульного листа документа Word. Для этого нужно перейти на вкладку «Разметка страницы» и нажать там на кнопку «Параметры страницы». Данная кнопка имеет небольшой размер и находится справа от надписи «Параметры страницы».

Если не получается найти кнопку «Параметры страницы», то кликните два раза по линейке документа.

Так или иначе, вы откроете окно «Параметры страницы». В данном окне есть блок настроек, который называется «Различать колонтитулы», а под ним две опции, «Колонтитулы четных и нечетных страниц» и «Колонтитулы первой страницы». Для того чтобы пронумеровать страницы без титульного листа вам нужно установить отметку напротив второй опции (Колонтитулы первой страницы). На скриншоте внизу показано, где именно нужно поставить отметку.

Дальше нужно сохранить настройки нажатием на кнопку «Ok». В результате в вашем документе Word номер страницы не будет отображаться на титульном листе. Но, на втором листе документа, нумерация начнется с числа 2. Если такой вариант вам подходит, то на этом можно закончить. Если же вы хотите, чтобы на втором листе стоял номер 1, то выполните операции, описанные в следующем шаге.

Шаг № 3. Исправляем нумерацию страниц.

Если вы хотите не только у убрать номер с титульного листа, но и начать нумерацию страниц с числа 2, то вам нужно вернуться на вкладку «Вставка», снова нажать на кнопку «Номер страницы» и в появившемся меню выбрать пункт «Формат номеров страниц».

В результате перед вами появится окно «Формат номера страниц», в котором можно изменить настройки нумерации. Для того чтобы на втором листе документа Word стояло число 2 вам нужно включить опцию «Начать с» и ввести число «0». Так как это показано на скриншоте внизу.

Дальше сохраняем настройки нажатием на кнопку «Ok» и получаем необходимый результат. Теперь страницы документа Word пронумерованы без титульного листа. При этом на втором листе документа стоит номер «2».

3. Выберите расположение нумерации на странице документа.

4. В контекстном меню нажмите на пункт «Формат номеров страницы…»

5. В окне «Формат номера страницы», в параметре «Нумерация страниц» активируйте опцию «начать с:», а затем выберите подходящий номер страницы.

6. Нажмите ОК

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

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

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS