Помогите пожалуйста с дз по информатике 8класс (паскаль) если можно с объяснением, а то тема не понятна

Задача 4 (PascalABC)var n, z1, z2 : integer; begin Repeat Write (' Введите двухзначное чиссло n = '); ReadLn (n); until (n >= 10) and (n <=99); z1 := n div 10; z2 := n mod 10; if (z1 = z2) then Writeln (' True') else WriteLn (' False'); end.