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!