expressoes com and e or

[guilhermerayol]

repeat
                        cont1 := random(5);
                    until cont1 <> 0;
                    vetor[cont1] := cont1;
                    vetor[cont1 + 1] := cont1 + 1;
                    repeat
                        cont2 := random(15);
                    until cont2 > 10;
                    vetor[cont2] := cont2;
                    vetor[cont2 + 1] := cont2 + 1;
                    repeat
                        cont3 := random(20);
                    until cont3 > 15;
                    vetor[cont3] := cont3;
                    vetor[cont3 + 1] := cont3 + 1;
                    repeat
                        cont4 := random(25);
                    until cont4 > 20;
                    vetor[cont4] := cont4;
                    vetor[cont4 + 1] := cont4 + 1;
repeat
cont5:=random(25);
until (cont5<>0) or (cont5>10) or (cont5<5) and (cont5<>15) and (cont5<>20)and (cont5<>cont1 or cont5<>cont2 or cont5<>cont3 or cont5<>cont4);
vetor[cont5]:=cont5;
vetor[cont5+1]:=cont5+1;                    

Alo quero criar um numero em cada linha de um cartao da lotofacil

exceto na segunda , depois criar um outro(numero) que pode estar em qualquer linha

exceto a segunda, este numero tem que ser diferente dos ja criados estou com dificuldades de criar expressoes (o uso dos parenteses e se a expressao é valida)

qualquer ajuda ai agradeço.