Pascal/Turbo Pascal - ayuda sobre pascal

necesito saber como hacer para sacar el maximo comun divisor de dos numeros enteros en trubo pascal. ayudenme.

Gueno, para sacar el MCD lo podes hacer usando el algoritmo de Euclides. Es bastante simple, ahi te paso el codigo:
var a, b: word;
{ Valores de ejemplo }
a:= 200;
b:= 168;
{ Algoritmo de Euclides }
repeat
R:= a mod b;
a:= b;
b:= R;
until R = 0;
writeln('El MCD es ', a);

Bueno espero q te sirva, Saludos y Suertessss....