В 6 и 7 строчках поменяй знаки > < на противоположные
Если танки поломались в одной колонне, то в скобочках нужно отнимать не максимальный номер поломавшегося танка, а минимальный
Исправленная версия:
var m,n,m1,n1,n2,m2,t: Integer;
begin
readln(m,n);
readln(m1,n1);
readln(m2,n2);
if(m1=m2) then
if(n1 t:=m*n-(n-n1 + 1)
else
t:=m*n-(n-n2 + 1)
else
t := m*n - (n-n1 + 1) - (n-n2 + 1);
writeln(t);
end.