HATA NERDE???????:(

[abdullah erdi önüt]

program toplama_
integer::N,i
real::sayi,toplam,ortalama
10 print*,"kac tane sayi gireceksiniz?"
read*,N
toplam=0
do i=1,N
print*,"sayiyi giriniz"
read*,sayi
toplam=toplam+sayi
end do
ortalama=toplam/N
print*,"toplam=",toplam,"ortalama=",ortalama
print*,"programdan cikmak istiyormusunuz?"
print*,"evet/e,hayir/h"
read*,cevap
if((cevap=="h").or.(cevap=="H"))then
goto 10
else
goto 20
end if
20 end program






arkadaslar programın calısmasında herhangı bır sorun yok fakat
calıstırdıktan sonra sole bır sorun ortaya cıkıyor::
programdan cıkmak ıstıyormusunuz sorusuna evet de desek hayır da desek
yınede hata vererek programdan cıkıyor....buna BIR COZUM Bulursanız
sevınırım.ıyı calısmalarr.....

[ayku...@hotmail.com]

h ve e yi character olarak tanıtmalısın sanırım..

[abdullah erdi önüt]

charecter ı en basta tanıtıyoruz dımı???

[abdullah erdi önüt]

ya bısı soyleyecegım sana bunda character le tanıtılmalarda
olmuyor ....bunda baska degısık bır problem var ve cozen olursa
sevıvırım yane sorun devam edıyor...

[ayku...@hotmail.com]

sanırım buldum sorunu,character::cevap kısmını ekledık mı sorun
cozuluo sanırım,kolay gelsın..

[abdullah erdi önüt]

tamam da character::cevapp ı nereye yazıyoruz...????

[ayku...@hotmail.com]

integer altına veya ustune yazabilirsin

[abdullah erdi önüt]

tamadır aykut saolasın oldu....ıcıme bır rahatlık geldı
tesekkurler....:)

On 30 Mart, 12:40, aykutu...@hotmail.com wrote:
> integer altına veya ustune yazabilirsin