Laburpena

English: Hypocycloid with ${\displaystyle k=4}$

 

Fitxategi hau (bektore-irudia) hau Inkscape-ekin sortu da . .

c#ban a leprogramozása(forráskód):

using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Drawing.Drawing2D; using System.Text; using System.Windows.Forms;

namespace WindowsApplication1 {

   public partial class Form1 : Form
   {
       Graphics mygr;
       Pen mypen;
       public Form1()
       {
           
           InitializeComponent();
       }

       private void Form1_Paint(object sender, PaintEventArgs e)
       {
           mygr = CreateGraphics();
           mypen = new Pen(Color.Red, 3);
       }

       private void button1_Click(object sender, EventArgs e)
       {
           
           kor(100);
       }
      private PointF F(double u,int R)
      {
          PointF SP = new PointF();
          SP.X=(float)(R*Math.Pow(Math.Cos(u),3));
          SP.Y = (float)(R *Math.Pow(Math.Sin(u),3));
              return (SP);
      }
       private void kor(int R)
       {
           int db = 50;
           double a = 0;
           double b = 2 * Math.PI;
           double h = Math.Abs(b - a)/db;
           double u = a;
           PointF P0, P1;
           P0=new PointF();
           P1=new PointF();;
           P0 = F(u,R);
           mygr.TranslateTransform(100, 100);
          
           for (int i = 2; i <= db+1; i++)
           {
               
              
               u = u + h;
               P1 = F(u, R);
                mygr.DrawLine(mypen,P0,P1);
                P0 = P1;
               
           }

       }
   }

}

Lizentzia

Nik, lan honen egile eskubideen jabeak, lan hau domeinu publikoan jartzen dut. Mundu osoan du eragina honek. Estatu batzuetan beharbada hori ez da legez posible izango. Halakoetan: Edonori ematen diot lan hau edozertarako erabiltzeko eskubidea, inolako baldintzarik gabe, legeak nahitaez ezarritako baldintzak izan ezik.