پروژه برنامه نویسی دکتر جوادی 9101
clc
clear all
disp('mech9101')
disp('^^^be har reshte yek kod ekhtesas dade meshavad^^^')
n=input('tedadreshte daneshgah');
g=0;
for q=1:n;
disp('q=kode reshte \/')
q
m=input('tedaddaneshjo');
i=0;
for z=1:m
g=g+1;
i=i+1;
id=input('shomarredaneshjoii');
w=input('salvorod');
p=input('termvorodi,1ya2');
't=tedad term';
if p==1
t=(92-w)*2;
else
t=(92-w)*2-1;
end
s=0;
f=0;
for a=1:t
e=input('tedad vahed term');
r=input('moadel term');
s=r*e+s;
f=e+f;
end
avr=s/f;
u(g,1)=id;
u(g,2)=w;
u(g,3)=q;
u(g,4)=avr;
nomm(i,1)=avr;
nomm(i,2)=id;
end
'------i=tedad daneshjo reshte-----';
k=nomm(:,1);
z=max(k);
for j=1:i
if z==nomm(j,1)
nomm(j,2);
v=j;
end
end
b(q,1)=nomm(v,1);
b(q,2)=nomm(v,2);
end
'b=matris nafarat maxreshteha,'
b
x=max(b(:,1));
for c=1:n
if x==b(c,1)
disp(' kod reshte nafar bartar daneshgah ')
c
disp('shomare daneshjoie nafar bartar daneshgah ')
b(c,2)
disp('nomre nafar bartar daneshgah ')
x
end
end
u
شجاعت همیشه فریاد زدن نیست