arkadaşım pascalı unuttum ama. şöyle bir algoritma sunabilirm.
1- iki sayıyı karşılaştır. büyük olana enb ata diğerine enk ata
2- büyük sayıyı, küçük sayıya kadar olan sayılara böldür. enb / sayi = tamsayı ise sayacı 1 arttır. bu bir tek enb / 1 için mümkün olacaktır.
3- eğer sayac 2 den farklı ise aralarında asal değil. sayac 1 ise aralarında asal.(burayı if ile yaparsın.)

örnek verecek olursak ;

3,5 aralarında asalmı.
büyük sayı : 5, küçük sayı: 3
1. adım 5 / 1 = 5 (sonuc tamsayı) sayac 1 olsun
2. adım 5 / 2 = 2.5 (soncu tamsayı değil sayaca arttmaz)
3. adım 5 / 3 = 1.67( sonuc tamsayı değil sayac arttmaz).

if(sayc == 1 ) print ("aralarında asal");
else print (aralarında asal değil.)

ama bu iyi bir çözüm deildir. büyük sayılar için program kasar. ilk aklıma gelen hemen bu oldu. ama iş görür.