. Определите результат выполнения программы: var a, b: integer; begin a:-10; b:-20; writeln('a', a, 'b', b); a:=b; b:a: writeln('a', a, 'b', b); end.

Давайте разберем вашу программу шаг за шагом.

1. Вначале объявляются две переменные a и b типа integer.

2. Затем переменным присваиваются значения: a := -10; и b := -20;. То есть теперь:

   • a равно -10
   • b равно -20

3. Затем выполняется первая команда writeln('a', a, 'b', b);. Она выводит на экран текущие значения переменных:

   • Вывод будет: a-10b-20

4. Далее происходит присвоение значений: a := b;. Теперь a принимает значение b, поэтому:

   • a теперь равно -20
   • b по-прежнему равно -20

5. Затем выполняется b := a;. В этот момент значение a, которое теперь -20, присваивается переменной b. Таким образом:

   • a остается -20
   • b также теперь равно -20

6. Наконец, выполняется вторая команда writeln('a', a, 'b', b);, которая выводит значения переменных:

   • Вывод будет: a-20b-20

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

a-10b-20
a-20b-20

Если у вас есть дополнительные вопросы или нужно объяснить что-то еще, не стесняйтесь спрашивать!