BERE1337

08.12.2020 01:10

Информатика

Есть ответ 👍

14 для определения даты создания документа в текстовом процессоре ms word
необходимо использовать следующий путь в меню: «файл» - «свойства-
-1 «общие».
2документ».
3 «статистика».
- 4 «состав».
1.5 для установки вертикальной и горизонтальной полос прокрутки в текстовом
процессоре ms word необходимо использовать следующий путь в меню: «сервис» -
«параметры» -
- 1 «вид».
- 2 «общие».
- 3 «правка».
- 4 «печать».
16 для установки возможности печати белым текстом на синем фоне в текстовом
процессоре ms word необходимо использовать следующий путь в меню: «сервис» -
«параметры» -
- 1 «вид».
- 2 «общие».
- 3 «правка».
- 4 «печать».
17для установки режима черновой печати в текстовом процессоре ms word необходимо
использовать следующий путь в меню: «сервис» - «параметры» -
- 1 «вид».
- 2 «общие».
-3 «правка».
- 4 «печать».
18 для установки ориентации бумаги в текстовом процессоре ms word необходимо
использовать следующий путь в меню: «сервис» - «параметры страницы» -
- 1 «поля».
- 2 «размер бумаги».
- 3 «источник бумаги».
- 4 «mакет».
19для установки колонтитулов документа табличного процессора ms excel необходимо
использовать следующий путь в меню: «файл» - «параметры страницы» -
- 1 «страница».
- 2 «колонтитулы».
- 3 «поля».
- 4 «лист».
0 для установки ориентации текста в ячейке документа табличного процессора ms
excel необходимо использовать следующий путь в меню: «формат» - «ячейки» -
- 1 «число».
- 2 «выравнивание».
- 3 «шрифт».
- 4 «граница».

190

231

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

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

alyamirnaya28

Информатика

4,5(78 оценок)

как-то так:

//fpc 3.0.0

program helloworld;

var

str, ps1, zm1, ps2, zm2: string;

errors, i: integer;

begin

// обнуляем ошибки

errors: = 0;

// просим строку

writeln('enter string: ');

readln(str);

ps1: = 'чя'; // ищем в строке

zm1: = 'ча'; // меням на

ps2: = 'щя'; // ищем в строке

zm2: = 'ща'; // меняем на

// перебираем строку посимвольно

for i: =length(str) downto 1 do

// если нашли нужную подстроку, которая в ps1

if copy(str,i,length(ps1))=ps1 then

begin

inc(errors); // увеличиваем счетчик ошибок

insert(zm1,str,i); // вставояем перед найденой подстрокой нашу новую подстроку из zm1

delete(str,i+length(zm1),length(ps1)); // удаляем старую подстроку

end;

// перебираем строку посимвольно

for i: =length(str) downto 1 do

// если нашли нужную подстроку, которая в ps2

if copy(str,i,length(ps2))=ps2 then

begin

inc(errors); // увеличиваем счетчик ошибок

insert(zm2,str,i); // вставояем перед найденой подстрокой нашу новую подстроку из zm2

delete(str,i+length(zm2),length(ps2)); // удаляем старую подстроку

end;

// выводим

writeln('количество ошибок = ', errors);

writeln('исправленная строка: ', str);

end.

результат работы в приложении. более читабельную версию кода можно посмотреть и проверить тут:

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

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

Задай свой вопрос

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

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

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

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

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

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

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