Info
此问题已关闭。 请重新打开它进行编辑或回答。
How can i change these code to matlab code? and i need graphic for all of them, please help.
1 次查看(过去 30 天)
显示 更早的评论
First one:
rem cls rem Tenzimleyicinin sazlama parametrlerinin genishlendirilmish rem amplitud faza tezlik xarakteristikasina gore haseblanmasi open "azotv.bas" for output as#1 print#1, "-------------------------------------------------------" print#1, " w Im Re C0 C1 " print#1, "-------------------------------------------------------" m= 0.221 for w=0 to 2 step 0.01 i=i+1 k1=5/(6*exp(m*w)) a1=(-37.52*(w^3)*(m^3)+112.56*m*(w^3)+26.77*(m^2)*(w^2)-26.77*(w^2)-8.69*m*w+1)*k1 a2=(112.56*(w^3)*(m^2)-37.52*(w^3)-53.54*m*(w^2)+8.69*w)*k1 Ree=a1*cos(w)-a2*sin(w) Imm=a2*cos(w)+a1*sin(w) rem PI tenzimleyici C0=w*((m^2)+1)*Imm C1=m*Imm-Ree print#1, using "##.### ###.##### ###.##### ###.###### ###.#####";w,Imm,Ree,C0,C1 if i=10 then i=0: a$=input$(1) if C0<0 then end next w print #1,"-------------------------------------------------------" end if true % code end
second one:
rem cls rem Naykvist kriteriyasina gore tenzimleyicinin rem dayanaqliqinin tedqiq edilmesi open "naykotv.bas" for output as#1 print#1, "----------------------------------" print#1, " w Re Im " print#1, "----------------------------------" for w=0.00001 to 10 step 0.1 i=i+1 AA=0.192*cos(w)+0.84*w*sin(w) BB=0.84*w*cos(w)-0.192*sin(w) CC=37.52*(w^4)-8.69*(w^2) DD=w-26.77*(w^3) KK=CC^2+DD^2 Re=(AA*CC+BB*DD)/KK Im=(BB*CC-AA*DD)/KK print#1, using "##.### ###.##### ###.##### ";w,Re,Im if i=10 then i=0: rem a$=input$(1) next w print#1, "----------------------------------" end
third one:
rem cls rem Qapali sistemin oturme funksiyasinin heqiqi Rem hissesinin w-dan asililiginin qurlmasi open "kotv.bas" for output as#1 print#1, "--------------------" print#1, " w Req " print#1, "--------------------" for w=0.00001 to 6 step 0.1 i=i+1 AA=0.21*cos(2*w)+0.65*w*sin(2*w) BB=0.65*w*cos(2*w)-0.21*sin(2*w) CC=15.87*(w^4)-6.2*(w^2) DD=w-12.47*(w^3) KK=CC^2+DD^2 Re=(AA*CC+BB*DD)/KK Im=(BB*CC-AA*DD)/KK Re1=1+Re DD=Re1^2+Im^2 Req=(Re1*Re+Im^2)/DD print#1, using "##.### ###.##### ";w,Req if i=10 then i=0: a$=input$(1) next w print "----------------------------------" end
1 个评论
John D'Errico
2016-5-4
Sorry, but if you want MATLAB code, you need to learn MATLAB. We are not a service here that takes code in any language and converts it to MATLAB for you.
回答(0 个)
此问题已关闭。
另请参阅
Community Treasure Hunt
Find the treasures in MATLAB Central and discover how the community can help you!
Start Hunting!