Добрый день! И так, начнём.. *Вопрос: Изменится ли строка ST, над которой произведут операцию COPY? Почему? *ответ: Изменится, т.к. при использовании функции COPY необходимо указывать в какой строке копировать, с какой позиции, и количество символов, которое будет копировано. **Вопрос: Чему будет равняться k после операции k:=length(‘мышь и клавиатура’)? **ответ: Переменная k будет равна 17, т.к. функция LENGTH определяет длину строки, считая каждый пробел, запятую, буквы и т.д. ***Вопрос: Чему будет равняться переменная tx после операции tx:=‘лесник’; delete(tx,4,3)? ***ответ: Переменная tx будет равна слову лес. Функция DELETE удаляет часть символов из строки. В нашем случае удаление происходит в строке tx, с позиции 4, удаляет 3 символа. Вопрос: Чему будет равняться переменная k после операции tx:=‘баобаб’; k:=pos(‘ба’,tx)? ответ: Переменная k будет равна 1. Т.к. функция POS определяет первое вхождение заданного символа. Дополненная программа: program zadacha1; var t: string; b: string[1]; n, k, i: integer; begin writeln('Введите текст: '); readln(t); n := length(t); k := 0; for i := 1 to n do begin b := copy(t, i, 1); if (t[i] = 'a') or (t[i] = 'A') or (t[i] = 'а') or (t[i] = 'А') then k := k + 1; end; writeln ('k= ', k); end.
*Курсивом и выделением обозначены дополнения в программе.
Текстовый документ в Word можно создать следующими выбрать команду Создать в меню Файл, затем в области задач (изменится режим на «Создание документа») в разделе Создание выбрать «Новый документ», основанный на шаблоне Обычный или разделе Шаблоны в пункте На моем компьютере выбрать предопределенный шаблон или мастер, на основе которого требуется создать документ или шаблон.; щелкнуть пиктограмму Создать на панели инструментов Стандартная, откроется пустой документ Документ 1, основанный на шаблоне Обычный.
И так, начнём..
*Вопрос: Изменится ли строка ST, над которой произведут операцию COPY? Почему?
*ответ: Изменится, т.к. при использовании функции COPY необходимо указывать в какой строке копировать, с какой позиции, и количество символов, которое будет копировано.
**Вопрос: Чему будет равняться k после операции k:=length(‘мышь и клавиатура’)?
**ответ: Переменная k будет равна 17, т.к. функция LENGTH определяет длину строки, считая каждый пробел, запятую, буквы и т.д.
***Вопрос: Чему будет равняться переменная tx после операции tx:=‘лесник’; delete(tx,4,3)?
***ответ: Переменная tx будет равна слову лес. Функция DELETE удаляет часть символов из строки. В нашем случае удаление происходит в строке tx, с позиции 4, удаляет 3 символа.
Вопрос: Чему будет равняться переменная k после операции tx:=‘баобаб’; k:=pos(‘ба’,tx)?
ответ: Переменная k будет равна 1. Т.к. функция POS определяет первое вхождение заданного символа.
Дополненная программа:
program zadacha1;
var t: string; b: string[1]; n, k, i: integer;
begin
writeln('Введите текст: ');
readln(t);
n := length(t);
k := 0;
for i := 1 to n do begin
b := copy(t, i, 1);
if (t[i] = 'a') or (t[i] = 'A') or (t[i] = 'а') or (t[i] = 'А') then k := k + 1;
end;
writeln ('k= ', k);
end.
*Курсивом и выделением обозначены дополнения в программе.