7) What is the result printed on the screen after executing the following program fragment? var str1,str2,str3, str4

  • 62
7) What is the result printed on the screen after executing the following program fragment?

var str1,str2,str3, str4: string[25];
str1 := "Дима сдал";
str2 := "на отлично";
str3 := "экзамен";
str4 := str1 + "_ " + str2 + "_ " + str3;

8) Compare the two strings: "Belka ", "Bylka ", "Belka ", "Belka ", "bylka ", "Bylka ", "bylka ", "bylk ".

9) Given str1:="AB CD EF GH"; and str2:="Сегодня прекрасный день"; find the lengths k1 and k2 respectively.

10) Given str1:="АБВГДЕЖЗИЙКЛ"; str2:="ABCDEFGH"; find the value of the variable str3 after executing the following program fragment:

str3:= copy(str1,5,3);
writeln(str3);
writeln(copy(str2,1,4));

11) Given str1:="абвгдежзийкл"; delete a substring from str1 starting from the second position and with a length of 5. Finally, print the updated value of str1.
Skvoz_Ogon_I_Vodu
36
7) Результат, выводимый на экран после выполнения данного фрагмента программы, будет следующим:

\[
\text{{str1}} := \text{{"Дима сдал"}};
\]

\[
\text{{str2}} := \text{{"на отлично"}};
\]

\[
\text{{str3}} := \text{{"экзамен"}};
\]

\[
\text{{str4}} := \text{{str1 + "\_ " + str2 + "\_ " + str3}};
\]

При объединении строк оператором "+", строки присоединяются друг к другу, и в результате получается новая строка. В данном случае, после выполнения этого оператора получится следующая строка:

\[
\text{{str4}} = \text{{"Дима сдал\_ на отлично\_ экзамен"}}.
\]

Таким образом, на экран будет выведена строка "Дима сдал\_ на отлично\_ экзамен".

8) Сравним две строки: "Belka ", "Bylka ", "Belka ", "Belka ", "bylka ", "Bylka ", "bylka ", "bylk ".

Для сравнения строк будем использовать лексикографический порядок, где каждый символ в строке имеет своё значение. Если первый символ двух строк разный, строка, у которой символ на этой позиции меньше, будет считаться меньшей. Если первый символ одинаковый, сравниваются следующие символы и так далее.

Сравнивая данные строки, получим следующий порядок:

"Belka " < "Belka " < "Bylka " < "Belka " < "Bylka " < "bylka " < "bylk " < "bylka ".

Таким образом, строка "Bylka " будет считаться наибольшей, а строка "bylk " наименьшей.

9) Рассмотрим строки: str1 := "AB CD EF GH"; и str2 := "Сегодня прекрасный день". Найдем длины k1 и k2 соответственно.

Для определения длины строки в Pascal используется функция Length(). Применим эту функцию к двум строкам:

k1 = Length(str1) = 11 (пробелы также учитываются в длине строки).

k2 = Length(str2) = 24.

Таким образом, длина строки str1 равна 11, а длина строки str2 равна 24.

10) Даны строки: str1 := "АБВГДЕЖЗИЙКЛ"; str2 := "ABCDEFGH". Найдем значение переменной str3 после выполнения данного фрагмента программы:

str3 := Copy(str1, 4, Length(str2)).

Функция Copy() возвращает подстроку из указанной строки. Первым параметром указывается исходная строка, вторым параметром указывается позиция начала вырезаемой подстроки, а третьим параметром указывается её длина.

Применим функцию Copy() к строке str1 с позиции 4 (включительно) и длиной, равной длине строки str2. Получим следующий результат:

str3 := "ГДЕЖЗИ" (последний символ "К" не входит в вырезанную подстроку).

Таким образом, после выполнения данного фрагмента программы, значение переменной str3 будет равно "ГДЕЖЗИ".