Определи результат работы процедуры, применённой к слову «интернет». ПРОЦ перестановка НАЧАЛО ПОКА i <3 1 ДЕЛАТЬ $Буква 3D$Tекст [1 $Tекст [1] %3D $Tекст [1+1] $Tекст [іi+1] - $Tекст [1i+2] $Tекст [1+2] - $Tекст [1+3] $Tекст [i+3] 3 $Буква КОНЕЦ КОНЕЦ

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

В данном случае, данная процедура переставляет буквы слова "интернет" в определенном порядке.

Шаг 1: Инициализация переменной i со значением 1.
Шаг 2: Пока i меньше 3 выполнять следующие действия:
- Присвоить переменной 3D значение буквы из слова "интернет" с индексом i.
- Присвоить переменной Текст[1] значение буквы из слова "интернет" с индексом i + 1.
- Присвоить переменной Текст[іi+1] значение буквы из слова "интернет" с индексом i + 2.
- Присвоить переменной Текст[1i+2] значение буквы из слова "интернет" с индексом i + 3.
- Присвоить переменной Текст[1+2] значение буквы из слова "интернет" с индексом i + 4.
- Присвоить переменной Текст[1+3] значение буквы из слова "интернет" с индексом i + 5.
- Присвоить переменной Текст[i+3] значение буквы из слова "интернет" с индексом i + 6.
- Увеличить значение переменной i на 1.
Шаг 3: Вывести результат работы процедуры.

Теперь давайте последовательно выполним все шаги процедуры для слова "интернет":

Шаг 1: i = 1.
Шаг 2: i < 3 выполняется, поэтому продолжаем.
- 3D = значение буквы "и" из слова "интернет".
- Текст[1] = значение буквы "н" из слова "интернет".
- Текст[іi+1] = значение буквы "т" из слова "интернет".
- Текст[1i+2] = значение буквы "е" из слова "интернет".
- Текст[1+2] = значение буквы "р" из слова "интернет".
- Текст[1+3] = значение буквы "н" из слова "интернет".
- Текст[i+3] = значение буквы "е" из слова "интернет".
- Увеличиваем значение i на 1. Теперь i = 2.
- 3D = значение буквы "н" из слова "интернет".
- Текст[1] = значение буквы "т" из слова "интернет".
- Текст[іi+1] = значение буквы "е" из слова "интернет".
- Текст[1i+2] = значение буквы "р" из слова "интернет".
- Текст[1+2] = значение буквы "н" из слова "интернет".
- Текст[1+3] = значение буквы "е" из слова "интернет".
- Текст[i+3] = значение буквы "т" из слова "интернет".
- Увеличиваем значение i на 1. Теперь i = 3.
- 3D = значение буквы "т" из слова "интернет".
- Текст[1] = значение буквы "е" из слова "интернет".
- Текст[іi+1] = значение буквы "р" из слова "интернет".
- Текст[1i+2] = значение буквы "н" из слова "интернет".
- Текст[1+2] = значение буквы "е" из слова "интернет".
- Текст[1+3] = значение буквы "т" из слова "интернет".
- Текст[i+3] = значение буквы "е" из слова "интернет".
- Увеличиваем значение i на 1. Теперь i = 4.

Шаг 3: Выводим результат работы процедуры.

Результат работы процедуры будет следующим:
3D = "т"
Текст[1] = "е"
Текст[іi+1] = "р"
Текст[1i+2] = "н"
Текст[1+2] = "е"
Текст[1+3] = "т"
Текст[i+3] = "е"

Таким образом, результат работы процедуры, примененной к слову "интернет", будет:
3D = "т",
Текст[1] = "е",
Текст[іi+1] = "р",
Текст[1i+2] = "н",
Текст[1+2] = "е",
Текст[1+3] = "т",
Текст[i+3] = "е".