Abdulganieva1367
?>

Задача №1 Дана строка, подсчитать количество вхождений слова «кот» в данную строку. Пример: st:=’кровать’; copy(st, 2, 3); Результат типа string A:=’ров’; program pr1; var st: string; i, k: integer; begin write('введите строку: '); readln(st); k:=0; for i:=1 to length(st) do if copy(st, i, 3)='кот' then k:=k+1; write('количество вхождений=', k); end. Задача №2 Найти номер позиции, с которой в заданной строке в первый раз встретится некоторое введенное слово. Пример: A:=’юмор’; B:=’ор’; Pos(В, А); Результат типа integer D:=3; program pr2; var st1, st2:string; t:integer; begin write ('введите строку: '); readln(st1); write ('введите слово: '); readln(st2); t:=pos(st2, st1); write('введенное слово начинается с ', t, ' позиции'); end. Задача №3 Подсчитать количество запятых в заданном тексте с массива символов. program pr3; var st:string; i, k:integer; begin write ('введите строку: '); readln(st); k:=0; for i:=1 to length(st) do if st[i]=', ' then k:=k+1; write('количество запятых=', k); end. Задача №4 Заменить в заданной строке все вхождения «ку» на «за» с операции копирования, удаления и вставки. program pr4; var st:string; i:integer; begin write('введите строку:'); readln(st); for i:=1 to length(st) do if copy(st, i, 2)='ку' then begin delete(st, i, 2); insert('за', st, i); end; write(st); end. Д/з Решить задачи и составить к ним программы: В строке заменить все двоеточие(:)точкой с запятой (; Подсчитать количество замен. Подсчитать количество букв «О» и «о» в строке.

Информатика

Ответы

slazurnaya

Найдем, сколько символов вычеркнул Саша – 28 байт надо разделить на вес одного символа 32 бита, но перед делением надо привести все величины к одной единице измерения – проще к байтам.

32 бита = 4 байта, значит в одном байте 8 бит, значит в 32 битах 4 байта так как 32 / 8 = 4

Теперь можно делить 28 байт на 4 байта = 7 символов. Получается, что Саша вычеркнул из сообщения 7 символов. Из 7 вычеркнутых символов один символ был лишней запятой, и еще один лишний пробел.

Значит, символов в вычеркнутом слове будет 7 - 2 = 5.

Ищем в вариантах ответа слово из 5 букв.

Это слово тыква.

ответ: тыква.

lenapopovich556510

1. Окончание срока действия триальной версии (следует приобрести лицензионную копию продукта, а если она была приобретена - переактивировать, обратившись за в техподдержку (адреса и телефоны см. в мини-форуме во Эта надпись появляется тогда, когда вы открываете документы, созданные в более ранних версиях редактора, например, в Word 2003. В этом случае не используются новые возможности редактора, обеспечивая режим совместимости разных версий.

Нужно преобразовать документ в формат Office 2007. Тогда эта надпись исчезнет, но при открытии преобразованного документа в более ранних версиях редактора возникнут проблемы при редактировании, либо уже при открытии документа.

Чтобы преобразовать документ, щелкните по кнопке Office и выберите команду Преобразовать. Откроется диалоговое окно, предупреж дающее о последствиях такого преобразования. Если вы подтвердите преобразование, то заменит / сохранит текущий документ в новом формате.

Если кнопка "Преобразовать отсутствует" - следует сохранить две версии одного документа: одна для старых редакторов, другая в новом формате. Это делается стандартно через выбор команды Сохранить как... .

3. Возможно, сработала защита документа (Вкладка - "Рецензирование" - "Защитить документ" - "Отключить защиту").

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Задача №1 Дана строка, подсчитать количество вхождений слова «кот» в данную строку. Пример: st:=’кровать’; copy(st, 2, 3); Результат типа string A:=’ров’; program pr1; var st: string; i, k: integer; begin write('введите строку: '); readln(st); k:=0; for i:=1 to length(st) do if copy(st, i, 3)='кот' then k:=k+1; write('количество вхождений=', k); end. Задача №2 Найти номер позиции, с которой в заданной строке в первый раз встретится некоторое введенное слово. Пример: A:=’юмор’; B:=’ор’; Pos(В, А); Результат типа integer D:=3; program pr2; var st1, st2:string; t:integer; begin write ('введите строку: '); readln(st1); write ('введите слово: '); readln(st2); t:=pos(st2, st1); write('введенное слово начинается с ', t, ' позиции'); end. Задача №3 Подсчитать количество запятых в заданном тексте с массива символов. program pr3; var st:string; i, k:integer; begin write ('введите строку: '); readln(st); k:=0; for i:=1 to length(st) do if st[i]=', ' then k:=k+1; write('количество запятых=', k); end. Задача №4 Заменить в заданной строке все вхождения «ку» на «за» с операции копирования, удаления и вставки. program pr4; var st:string; i:integer; begin write('введите строку:'); readln(st); for i:=1 to length(st) do if copy(st, i, 2)='ку' then begin delete(st, i, 2); insert('за', st, i); end; write(st); end. Д/з Решить задачи и составить к ним программы: В строке заменить все двоеточие(:)точкой с запятой (; Подсчитать количество замен. Подсчитать количество букв «О» и «о» в строке.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kostmax1971
DzukaevAlekseevich
pizzaverona
ЕленаАнастасия315
Александровна1742
klepa-79
sv455umarketing74
Lolira64
vickuznetsova8677
ietishkin
Коновалова1705
Виталий_Ильназ574
aromastil88
Maksimova1320
Ladyby6224