دینا فایل / دانلود پاورپوینت کامپیوتر ( عمليات تکرار Repetition در برنامه نویسی )(قابل ویرایش)
دانلود پاورپوینت کامپیوتر ( عمليات تکرار Repetition در برنامه نویسی )(قابل ویرایش)
دانلود پاورپوینت کامپیوتر ( عمليات تکرار Repetition در برنامه نویسی )(قابل ویرایش)
دانلود پاورپوینت کامپیوتر ( عمليات تکرار Repetition در برنامه نویسی ) به منظور جلوگيری از اغتشاش بهتر است حتماً حلقه ها دارای اسم باشند (به مثال زير توجه شود)PROGRAM averscore REAL :: mark, average INTEGER:: stid, loop ,nWRITE(*,*)”type in the number of students”mainloop: DO WRITE(*,*) Please give student id READ(*,*) stid IF (stid==0) EXIT mainloop average=0 innerloop: DO loop=1,n WRITE(*,*) Please enter mark READ(*,*) mark IF (mark==0) CYCLE innerloop negs: IF (mark<0) THEN WRITE(*,*) Wrong mark. Start again CYCLE mainloop END IF negs average=(average+mark) END DO innerloop average=(average)/n WRITE(*,*) Average of student,stid, is =...