Почему не принимает данное условие? (паскаль) ошибка - program1.pas(23) : встречено 'and', а ожидалось '; ' if (e=2) and (h> 28) then (e=3) and (h=1);

And,or,not можно использовать только в условии.
В твоем случае тебе придется использовать операторные скобки begin end.
If (e=2) and (h>28) Then
begin
e:=3;
h:=1;
end;