Определите значение переменной m после выполнения фрагмента программы: m:=7; n:=m mod 3; m:= n div 3

Рассмотрим выполнение фрагмента программы по каждой команде отдельно.

Команда 1: m :=7.

Результат выполнения: переменной m  присваивается значение 7.

Команда 2: n:= m mod 3.

Результат выполнения: Команда mod вычисляет остаток от целочисленного деления. Переменной n присваивается значение 1, т.к. 7 mod 3 =1. 

Команда 3: m:= n div 3.

Результат выполнения: Команда div определяет результат целочисленного деления. Переменной m присваивается значение 0, т.к. 1 div 3 = 0. 

Ответ: m=0.