C++ :

#include <iostream>
#include <cstdio>
using namespace std;
int main()
{
    int n;
    cin>>n;
    if((n%2==0) && (n%3==0) && (n%5==0))
    {
        cout<<"yes"<<endl;
    }
    else
    {
        cout<<"no"<<endl;
    }    
    return 0;
}

Pascal :

var n:longint;
begin
  readln(n);
  if (n mod 2=0) and (n mod 3=0) and (n mod 5=0) then writeln('yes')
    else writeln('no');
end.