ocaranpc

Bom, eu estou tentando fazer tipo uma calculadora de radiciação com pascal e está dando alguma coisa errada com o código que deveria estar funcionando Program Pzim ;var num,numatul,num1,indice,numfind,numrandom,valuereal : integer;Beginwrite ('valor: ');readln (numfind);write ('indice: ');readln (indice);randomize;numrandom:=random(10000000);num1:=numrandom;num:=num1;repeatif indice > 0 thenbeginnumatul:= num*num1;num:= numatul*num1;valuereal:=num;indice:=indice-1end;if valuereal <> numfind thenbeginrandomize;numrandom:=random(10000000);num1:=numrandom;num:=num1;end;until numfind = valuereal;write (numrandom);End. Primeiro ele pede o número e o índice, aí ele pega um valor aleatório e eleva ao número que foi pedido como índice, se o resultado for igual ao número pedido ele mostra o número sorteado, senão ele sorteia outro e faz o mesmo processo. Ele simplesmente entra em loop quando eu tento rodar, eu acho que ele não consegue sortear o número desejado ou coisa assim. o que está errado

Eu já programei com pascal dentro do compilador, tipo, com operações e Hello World , mais hoje eu resolvi abrir o Delphi 7 pra programar com o pascal e eu queria que alguém, por favor, me orientasse à usar as funções mais simples como read e aonde declarar as variáveis nesse ambiente do delphi, segue um print com um erro.