Fortran bilen?
Gönderim Zamanı: 30 Temmuz 2011 08:20
Acaba fortran bilenler var mı? Fortranda işlem tekrarını nasıl yapabiliriz.Mesela
L=0
WRITE(*,*)"LTFN M SAYISINI GIRINIZ"
READ(*,*)M
DO 40 I=1,M
L=L+I**2
40 CONTINUE
WRITE(*,*)"SONUC=",L
STOP
END
Yazdım ben.1 ile girdiğimiz m sayısının arasındaki sayıların karesini alıp topluyor. Şu şekilde: 1 kare+ 2kare..... mkare şeklinde.Ben bunu yapınca fortranı baştan açmak zorunda kalıyorum. Acaba repeat gibi komut var mı? Yani sayıyı bulduktan sonra bidaha lütfen m sayısını giriniz demesini istiyorum.
L=0
WRITE(*,*)"LTFN M SAYISINI GIRINIZ"
READ(*,*)M
DO 40 I=1,M
L=L+I**2
40 CONTINUE
WRITE(*,*)"SONUC=",L
STOP
END
Yazdım ben.1 ile girdiğimiz m sayısının arasındaki sayıların karesini alıp topluyor. Şu şekilde: 1 kare+ 2kare..... mkare şeklinde.Ben bunu yapınca fortranı baştan açmak zorunda kalıyorum. Acaba repeat gibi komut var mı? Yani sayıyı bulduktan sonra bidaha lütfen m sayısını giriniz demesini istiyorum.
Üye imzalarını sadece giriş yapan üyelerimiz görebilir
