//-----------------------------------------------------------------
    void main()
    {
      clrscr();
      int i,sp1=1,sp2=1,n,f=0;
      cout<<"n="; cin>>n;
      int* vek1 = new int[n];
      int* vek2 = new int[n];
      double* kmas = new double[n];
//------------------------------------------------------------------
      cout<<"zadaite 1 vektor"<<"\n";
      for (i=0; i<n; i++)
      {
    cin>>vek1[i];
      }
      cout<<"zadaite 2 vektor"<<"\n";
      for (i=0; i<n; i++)
      {
    cin>>vek2[i];
      }
//------------------------------------------------------------------
      for (i=0; i<n; i++)
      {
    sp1=sp1*vek1[i];
    sp2=sp2*vek2[i];
    if(vek2[i]!=0)kmas[i]=(double)vek1[i]/vek2[i];
      }
      sp2=sp1+sp2;
      if(sp2==0) cout<<"vektora perp. \n";
      else cout<<"vektora ne perp. \n";
      for (i=0; i<n-1; i++)
      {
    if(kmas[i]==kmas[i+1]) f=1;
    else {f=0; break;}
      }
      if(f=1) cout<<"vektora kol.";
      else cout<<"vektora ne kol.";
       for (i=0; i<n; i++)
      {
    cout<<"\n kmas["<<i<<"]="<<kmas[i];
      }

      delete []vek1;
      delete []vek2;
      delete []kmas;
      getch();
    }