玫瑰花函數

❶ VC6製作玫瑰花

僅供參考：

1、你那個把幾個數值和畫筆類型改一下就能滿足要求

2、給你一個完善的demo參考下

////////////////////////////////////////////////////////////////////
//程序名稱：一朵逼真的玫瑰花
//編譯環境：VC6.0，EasyX2011驚蟄版
//作者：孫琨
//編寫地點：XUST
//編寫時間：2013年11月11日
//編寫目的：贈給未來可能看到的你

#include<graphics.h>
#include<conio.h>
#include<math.h>

//定義全局變數
introsesize=500;
inth=-250;

//定義結構體
structDOT
{
doublex;
doubley;
doublez;
doublered;//紅色
doublegreen;//綠色
//blue（藍色)通過red計算
};

//計算點
boolcalc(doublea,doubleb,doublec,DOT&d)
{
doublej,n,o,w,z;

if(c>60)//花柄
{
d.x=sin(a*7)*(13+5/(0.2+pow(b*4,4)))-sin(b)*50;
d.y=b*rosesize+50;
d.z=625+cos(a*7)*(13+5/(0.2+pow(b*4,4)))+b*400;
d.red=a*1-b/2;
d.green=a;
returntrue;
}

doubleA=a*2-1;
doubleB=b*2-1;
if(A*A+B*B<1)
{
if(c>37)//葉
{
j=(int(c)&1);
n=j?6:4;
o=0.5/(a+0.01)+cos(b*125)*3-a*300;
w=b*h;

d.x=o*cos(n)+w*sin(n)+j*610-390;
d.y=o*sin(n)-w*cos(n)+550-j*350;
d.z=1180+cos(B+A)*99-j*300;
d.red=0.4-a*0.1+pow(1-B*B,-h*6)*0.15-a*b*0.4+cos(a+b)/5+pow(cos((o*(a+1)+(B>0?w:-w))/25),30)*0.1*(1-B*B);
d.green=o/1000+0.7-o*w*0.000003;
returntrue;
}
if(c>32)//花萼
{
c=c*1.16-0.15;
o=a*45-20;
w=b*b*h;
z=o*sin(c)+w*cos(c)+620;

d.x=o*cos(c)-w*sin(c);
d.y=28+cos(B*0.5)*99-b*b*b*60-z/2-h;
d.z=z;
d.red=(b*b*0.3+pow((1-(A*A)),7)*0.15+0.3)*b;
d.green=b*0.7;
returntrue;
}

//花
o=A*(2-b)*(80-c*2);
w=99-cos(A)*120-cos(b)*(-h-c*4.9)+cos(pow(1-b,7))*50+c*2;
z=o*sin(c)+w*cos(c)+700;

d.x=o*cos(c)-w*sin(c);
d.y=B*99-cos(pow(b,7))*50-c/3-z/1.35+450;
d.z=z;
d.red=(1-b/1.2)*0.9+a*0.1;
d.green=pow((1-b),20)/4+0.05;
returntrue;
}

returnfalse;
}


//主函數
voidmain()
{
//定義變數
short*zBuffer;
intx,y,z,zBufferIndex;
DOTdot;

//初始化
initgraph(640,480);//創建繪圖窗口
setbkcolor(WHITE);//設置背景色為白色
cleardevice();//清屏

//初始化z-buffer
zBuffer=newshort[rosesize*rosesize];
memset(zBuffer,0,sizeof(short)*rosesize*rosesize);

for(intj=0;j<2000&&!_kbhit();j++)//按任意鍵退出
{
for(inti=0;i<10000;i++)//減少是否有按鍵的判斷
if(calc(double(rand())/RAND_MAX,double(rand())/RAND_MAX,rand()%46/0.74,dot))
{
z=int(dot.z+0.5);
x=int(dot.x*rosesize/z-h+0.5);
y=int(dot.y*rosesize/z-h+0.5);
if(y>=rosesize)continue;

zBufferIndex=y*rosesize+x;

if(!zBuffer[zBufferIndex]||zBuffer[zBufferIndex]>z)
{
zBuffer[zBufferIndex]=z;

//畫點
intred=~int((dot.red*h));
if(red<0)
red=0;
if(red>255)
red=255;

intgreen=~int((dot.green*h));
if(green<0)
green=0;
if(green>255)
green=255;

intblue=~int((dot.red*dot.red*-80));
if(blue<0)
blue=0;
if(blue>255)
blue=255;

putpixel(x+50,y-20,RGB(red,green,blue));
}
}

Sleep(1);
}

//退出
delete[]zBuffer;
getch();
closegraph();
}

❷ EXCEL的=IF(COUNT(FIND函數是否有字數限制求具體應用說明

設個對應表
比如 F 列 為 F1: LA001 F2: LA002 F3 :LA003 。。。。。
G 列返搜為 G1: 玫瑰花 G2 : 8厘多角漏模歷珠 G3 :橢圓珠碼握 。。。。。
公式改為
=INDEX(G:G,IF(ISNUMBER(FIND(F:F,B2,1)),ROW(F:F),4^8))
按Ctrl+Shift+enter結束公式
就可以了，這個沒有條件限制

=INDEX(G:G,IF(ISNUMBER(FIND(F:F,B2,1)),ROW(F:F),4^8))
按Ctrl+Shift+enter結束公式

❸ 求玫瑰的函數圖像

matlab源代碼： plot_rose
draw_main(450,90);
function draw_main(x,y)
%粉紅色玫瑰
arcdata{1}=[65 -60 150 350 8
66 -54 300 470 8
65 -56 30 230 10
64 -57 300 490 17];
ellipsedata{1}=[73 -30 250 450 27 40
59 -30 100 290 27 40
65 -40 140 270 20 30];
arcdata{2}=[0 0 150 350 12
1 8 280 470 12
0 2 30 230 16
0 3 80 240 28
2 8 180 330 22
-2 2 310 460 25];
ellipsedata{2}=[-12 30 120 300 30 40
10 28 250 423 30 42
-4 10 290 393 30 40];
ellipsedata{3}=[120 5 0 360 15 25];
ellipsedata{4}=[-70 10 0 360 14 20];
rose_e{2}=[x+16 y+32 235 355 26 35
x-15 y+32 190 310 30 35
x+0 y+35 190 350 43 50];
rose_e{1}=[x+80 y-48 220 350 22 50
x+50 y-48 190 320 22 50
x+65 y-28 180 360 36 50];
rose_e{3}=[x+120 y-6 200 340 17 25
x+120 y+7 160 380 17 27];
rose_e{4}=[x-70 y+15 140 390 17 20
x-75 y-10 205 340 10 30
x-60 y-10 195 340 5 30];
arcdata{3}=[0 82 190 350 6];
ss={'m','r','b','y'};
s0={'k','k','g'};
figure('menubar','none','numbertitle','off','name','rose');
% figure('numbertitle','off','name','rose');
hold on
for j=1:length(ellipsedata)
for i=1:size(ellipsedata{j},1)
rectangle('Position',[x+ellipsedata{j}(i,1)-ellipsedata{j}(i,5),y+ellipsedata{j}(i,2)-ellipsedata{j}(i,6),2*ellipsedata{j}(i,5),2*ellipsedata{j}(i,6)],'Curvature',[1,1],...
'FaceColor',ss{j})
end
if j<4
for i=1:size(arcdata{j},1) draw_arc(x+arcdata{j}(i,1),y+arcdata{j}(i,2),arcdata{j}(i,3),arcdata{j}(i,4),arcdata{j}(i,5),s0{j});
end
end
for i=1:size(rose_e{j},1)
plot_rose_e(rose_e{j},j);
end
end
for j=1:3
zhu=[x-98,y+100+j,255,371,100,80
x-20,y+30+j,260,358,140,140
x+224,y+20+j,180,218,160,140];
draw_branch(zhu);
end
ce_branch=[x+70,y+34,180,233,140,140;
x,y+40,205,255,100,120;
x+135,y-30,209,249,72,120;
x,y+20,263,301,100,120;
x+85,y-10,278,305,100,120;
x+100,y-62,282,308,90,120;
x-50,y-10,277,314,30,120;
x+70,y+80,222,266,52,120;
x-60,y-45,229,266,52,120;
x+79,y-45,229,266,52,120;
x+84,y,224,273,52,120;
x+110,y+40,240,282,100,120];
draw_branch(ce_branch);
t_leaf=[x+168,y+282,10,20,-40;
x+160,y+252,8,16,260;
x+145,y+270,8,16,-15;
x+156,y+224,10,20,-45;
x+150,y+200,8,16,270;
x+135,y+220,8,16,-10;
x+146,y+144,8,16,-80;
x+130,y+130,6,12,235;
x+125,y+154,7,14,-10;
x+78,y+98,6,12,-90;
x+60,y+90,5,10,180;
x+70,y+109,5,10,-45;
x-125,y+270,12,24,60;
x-95,y+270,10,20,10;
x-110,y+245,10,20,90;
x-105,y+220,10,20,45;
x-100,y+190,8,16,135;
x-75,y+210,8,16,-45;
x+65,y+190,10,20,-45;
x+40,y+185,8,16,0;
x+55,y+165,8,16,90];
for j=1:size(t_leaf,1)
draw_elli(t_leaf(j,1),t_leaf(j,2),t_leaf(j,3),t_leaf(j,4),t_leaf(j,5));
end
axis ij
axis off
set(gcf,'color','k');
daspect([1,1,1])
% 畫旋轉橢圓
function draw_elli(x0,y0,a,b,theta)
theta=-theta;
t = 0:0.01:2*pi;
x = a*cos(t);
y = b*sin(t);
xy = zeros(2,length(t));
for i = 1:length(t)
xy(:,i) = expm([0,-pi/180*theta;pi/180*theta,0])*[x(i);y(i)];
end
plot(x0 +xy(1,:),480-y0 + xy(2,:),'g');
% 畫弧線
function draw_arc(x0,y0,st_a,en_a,r,c_c)
t = (pi/180*st_a:0.01:pi/180*en_a)-pi;
x = x0 + r*cos(t);
y = y0 + r*sin(t);
plot(x,y,c_c);
% 花萼
function plot_rose_e(matr,ch)
x=[];y=[];n=size(matr,1);
for i=1:size(matr,1)
t=(matr(i,3):matr(i,4))*pi/180-pi;
x1=matr(i,1)+matr(i,5)*cos(t);
y1=matr(i,2)+matr(i,6)*sin(t);
if i<3
x1=2*matr(i,1)-x1;
end
x1=fliplr(x1);
y1=fliplr(y1);
if n<3 && i<2
x1=fliplr(x1);
y1=fliplr(y1);
end
if ch==4 && i==2
x1=fliplr(x1);
y1=fliplr(y1);
end
x=[x,x1];
y=[y,y1];
end
fill(x,y,'g');
% 畫樹枝
function draw_branch(zhu)
for k=1:size(zhu,1)
t=(zhu(k,3):zhu(k,4))*pi/180-pi;
x1=zhu(k,1)+zhu(k,5)*cos(t);
y1=zhu(k,2)+zhu(k,6)*sin(t);
x1=2*zhu(k,1)-x1;
plot(x1,y1,'g','linewidth',2);
end

❹ 寫一個函數，判斷某一個四位數是不是玫瑰花數

#include <iostream>
using namespace std;
void rose(int n)
{
int a,b,c,d;
a=n/1000;
b=(n/100)%10;
c=(n/10)%10;
d=n%10;
if(a*a*a*a+b*b*b*b+c*c*c*c+d*d*d*d==n)
cout<<n<<endl;
}
int main()
{ int i;
for(i=1000;i<10000;i++)
rose(i);
return 0;
}

❺ 輸出1000到9999之間的四葉玫瑰數，用C語言的知識回答

#include<stdio.h>
intmain()
{
inti,j,t;
for(i=1000;i<10000;i++)
{
t=0;
for(j=i;j;j/=10)
t+=(j%10)*(j%10)*(j%10)*(j%10);
if(t==i)
printf("%d
",i);
}
}


Output:
1634
8208
9474

❻ 康乃馨玫瑰百合花共40枝康乃馨是玫瑰的2倍玫瑰是百合的3倍求分別多少枝

如果學過函數，百合花X，玫瑰花3，升歲坦康乃馨3X*2=6X，40/吵桐10=x。X=4

沒有學過函數，把百合花看著整體1，玫瑰雀啟花為3，康乃馨就為2*3=6，40/10=4

40/除以（1+3+2*3）=4，玫瑰花4*3=12，康乃馨12*2=24

❼ c語言編寫程序 水仙花數 玫瑰花數

1
#include <stdio.h>
#include <stdlib.h>
int flower(int n)
{
int i, j, k;
i = n % 10;
j = n / 10 % 10;
k = n / 100;
if (i*i*i + j*j*j + k*k*k == n)
return 1;
else
return 0;
}
int main(void)
{
int i;
for (i = 100; i < 1000; i++)
{
if (flower(i) == 1)
printf("%d ", i);
}
return 0;
}
2.
#include <stdio.h>
#include <stdlib.h>
int rose(int n)
{
int i, j, k,m;
i = n % 10;
j = n / 10 % 10;
k = n / 100%10;
m = n / 1000;
if (i*i*i*i + j*j*j*j + k*k*k*k+m*m*m*m == n)
return 1;
else
return 0;
}
int main(void)
{
int i;
for (i = 1000; i < 10000; i++)
{
if (rose(i) == 1)
printf("%d ", i);
}
return 0;
}

❽ 玫瑰線的數學中的

玫瑰線的極坐標方程為:ρ=a* sin(nθ),ρ=a*cos(nθ)
用直角坐標方程表示為: x=a* sin(nθ)* cos(θ), y=a*sin(nθ)* sin(θ)
根據三角函數的特性可知,玫瑰線是一種具有周期性且包絡線為圓弧的曲線,曲線的幾何結構取決於方程參數的取值,不同的參數決定了玫瑰線的大小、葉子的數目和周期的可變性。這里參數a(包絡半徑)控制葉子的長短,參數n控制葉子的個數、葉子的大小及周期的長短。
如對於方程式ρ=5* sin(3*θ)、ρ=5* sin(2*θ)、ρ=5* sin(3*θ/2)，分別對應的是三葉、四葉和六葉玫瑰線。
玫瑰線總面積A
a = π 玫瑰線的參數主要是a、n及θ,其值的大小決定玫瑰線的形狀,包括葉子數、葉子長度寬度和曲線閉合周期。系數a只跟葉子的長度有關,而n和θ則影響玫瑰線的多樣性和周期性,本文主要討論n和θ對玫瑰線幾何結構的影響,從而揭示玫瑰線的生成規則。通過計算機對方程式ρ=a* sin(nθ)的大量試驗,證明玫瑰線具有如下三個特性:
特性1當n為整數時,若n為奇數,則玫瑰線的葉子數為n,閉合周期為π,即θ角在0-π內玫瑰線是閉合的。當n為偶數時,玫瑰線的葉子數為2n,閉合周期為2π,即θ角取值在0-2π內玫瑰線才是閉合和完整的。
特性2當n為非整數的有理數時,設為L/W,且L/W為簡約分數,此時,L與W不可能同時為偶數。L決定玫瑰線的葉子數,W決定玫瑰線的閉合周期(Wπ或2Wπ,見特性3)及葉子的寬度,W越大,葉子越寬。但W也會同時影響葉子數的多少,對同一奇數值L,在W分別取奇數和偶數值時,葉子數也是不同的。
特性3當L或W中有一個為偶數時,玫瑰線的葉子數為2L,閉合周期為2Wπ。當L或W同為奇數時,玫瑰線的葉子數為L,閉合周期為Wπ。換句話說,生成偶數個葉子的玫瑰線, L或W中必須有且只有一個為偶數值,且L為葉子數的一半,而生成奇數個葉子的玫瑰線, L和W都必須為奇數,且L值就是葉子數。 對於給定葉子數的玫瑰線,可以通過選擇n或L/W不同形式來生成。

❾ c語言編程

#include<stdio.h>
intmain(intargc,char*argv[])
{
intnum;
intjudge(intn);
printf("請輸入一個四位數字:"高帶);
scanf("%d",&num);
if(judge(num))
{
printf("Yes");
知拆}else
{
printf("No");
}
}

intjudge(intn)
{
intsum=0;
intm;
intpower_four(int);
m=n;
while(n)
{
sum+=power_four(n%10);
n/=10;
}

if(sum==m)return1;
return0;
}

intpower_four(int搭念棗x)
{
returnx*x*x*x;
}

試一下

❿ 如何用MATLAB畫玫瑰線

可以先寫一個畫扇形的function，輸入參數是兩個在圓上的點和一個圓心點，結果plot出來兩條射線和一個圓弧。
然後調用這個函數，既然有8片玫瑰圖案，那麼調用8次，每次分別給出扇形三個點的坐標即可。