C :

#include <stdio.h>
#include <string.h>
void fun(int num1,int num2)
{   
	
	int temp; 
	if(num1<num2)  
	{       
		temp=num1;   
	num1=num2;   
	num2=temp;   
	}   
	while(num2!=0)
	{        
		temp=num1%num2;   
		num1=num2;    
		num2=temp;  
	}    
	printf("%d\n",num1);
}
int main(void)
{   
	int num1,num2; 
	scanf("%d %d",&num1,&num2);  
	fun(num1,num2);  
	return 0;
}

C++ :

#include<stdio.h>
int main()
{
  int dgy(int,int);
  int l,x,z;
  scanf("%d%d",&l,&x);
  z=dgy(l,x);
  printf("%d\n",z);
  return 0;
}

int dgy(int l,int x)
{int q,w;
 if(x>l)
 {q=l;l=x;x=q;}
 while((w=l%x)!=0)
 {
   l=x;
   x=w;
 }
 return(x);
}

Pascal :

var m,n:longint;
function f(m,n:longint):longint;
var r:longint;
begin
r:=m mod n;
m:=n;
n:=r;
if n=0 then f:=m else f:=f(m,n);
end;
begin
read(m,n);
writeln(f(m,n));
end.