C :

#include <stdio.h>
int main (){
    int p,r,n,m,temp;
    scanf("%d %d",&n,&m);
 if (n<m)
     {temp=n;
      n=m;
      m=temp;
     }
   p=n*m;
 while (m!=0)
    {r=n%m;
     n=m;
     m=r;
 }
 printf("%d\n",p/n);
 return 0;
 }

C++ :

#include<iostream>
#include<cstdlib>
using namespace std;
int main()
{
	long long m,n,t;
	cin>>m>>n;
	long long a=m,b=n;
	int r=m%n;
	while(r!=0)
	{
	  m=n;
	  n=r;
	  r=m%n;
	}
	t=(a*b)/n;
	cout<<t;

	//system("pause");
	return 0;
}

Pascal :

var
  a,b,s,c,n,m,r:longint;
begin
  readln(m,n);
  a:=m;

  b:=n;

  repeat

  r:=a mod b;

  a:=b;

  b:=r;

  until r=0;

  s:=n*m div a;

  writeln(s);
end.