مشاهده نسخه کامل
: wickietetsu
12-06-2009, 18:39
سلام دوستان
لطفا کسانی که آشنایی هرچند جزئی با فرترن دارند منو راهنمائی کنن.
یه برنامه می خوام بنویسم که اعداد کوچکتر از 100 رو تقسیم بر 7 بکنه و رایت کنه.
آیا این برنامه ای که نوشتم درسته؟ مخصوصا قسمت اولش رو شک دارم. نمیدونم باید اول تو فرترن متغیرهایی رو که باید در برنامه ازشون استفاده کنم رو بعد از I= مشخص کنم.
I=N,A -----
N=0-----
101N=N+1
IF (N.GT.100) STOP-----
A=N/7-----
WRITE (*,*) A-----
GOTO 101-----
ممنون از شما.
لطفا کسانی که آشنایی هرچند جزئی با فرترن دارند منو راهنمائی کنن.
یه برنامه می خوام بنویسم که اعداد کوچکتر از 100 رو تقسیم بر 7 بکنه و رایت کنه.
آیا این برنامه ای که نوشتم درسته؟ مخصوصا قسمت اولش رو شک دارم. نمیدونم باید اول تو فرترن متغیرهایی رو که باید در برنامه ازشون استفاده کنم رو بعد از I= مشخص کنم.
I=N,A -----
N=0-----
101N=N+1
IF (N.GT.100) STOP-----
A=N/7-----
WRITE (*,*) A-----
GOTO 101-----
ممنون از شما.