Air Standard cycle

Objective: close allclear allclc%inputsgamma=1.2;t3=2000;%state variablesp1=202650;t1=600;%Engine geometric parametersbore=0.2;stroke=0.3;con_rod=0.14;cr=10;%state variable1v_s=pi/4*bore^2*stroke;v_c=v_s/(cr-1);v1=v_s+v_c;v2=v_c;%state variable 2%p2v2^gamma=p1v1^gamma|p2==p1*(v1/v2)^gamma|cr=v1/v2p2=p1*(v1/v2)^gamma;%p1v1/t1=p2v2/t2…