Question

1.Сравните константы и расположите их в порядке возрастания: 1. 'A cat' 2. 'Зоопарк' 3. 'The museum/ 4. 'The zoo' 2.Что будет выведено в результате выполнения фрагмента программы:A:=’пар’;B:=’о’;C:=’воз’;E:=’ход’;F:=length(A) + length(B)+ length(C)- length(Е) ;1)18 2)4 3)8 4)153. Какое значение будет иметь переменная s после выполнения программы: var i,n: integer; a,s:string; begin a:='топор'; n:=length(a); s:=a[n]; for i:=n-1 downto 2 do s:=s+a[i]; s:=s+a[1]; writeln(s); readln; end.1)потоп 2)ропот 3)топот 4)ротор

Answer 1

1. 'A cat' 3. 'Зоопарк' 4. 'The museum 2. 'The zoo'

Answer 2

Второе ответ 2
Третье ответ 2

Answer 3

Сравнение констант и их расположение в порядке возрастания:

1. 'A cat' 2. 'Зоопарк' 3. 'The museum' 4. 'The zoo'

Исходя из порядка возрастания, константы располагаются следующим образом: 1. 'A cat' 2. 'The zoo' 3. 'The museum' 4. 'Зоопарк'

Результат выполнения фрагмента программы:

```pascal A := 'пар'; B := 'о'; C := 'воз'; E := 'ход'; F := length(A) + length(B) + length(C) - length(E); ``` Выполнение данного фрагмента программы приведет к получению значения переменной F. Рассчитаем значение F: - length(A) = 3 - length(B) = 1 - length(C) = 3 - length(E) = 3

Теперь подставим значения и произведем вычисления: F = 3 + 1 + 3 - 3 = 4

Таким образом, результатом выполнения фрагмента программы будет 4.

Значение переменной s после выполнения программы:

```pascal var i, n: integer; a, s: string; begin a := 'топор'; n := length(a); s := a[n]; for i := n - 1 downto 2 do s := s + a[i]; s := s + a[1]; writeln(s); readln; end. ``` После выполнения данной программы значение переменной s будет 'ропот'. Программа берет последний символ строки a и затем добавляет оставшиеся символы в обратном порядке, после чего добавляет первый символ строки a, что приводит к получению строки 'ропот'.

Таким образом, значение переменной s после выполнения программы будет 'ропот'.

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

1. Результат выполнения фрагмента программы: 4 2. Значение переменной s после выполнения программы: 'ропот'