Konu: Q basıc hakkında bilgisi olan !!!!!

Soru: 1-(x^2/2!)+(x^4/4!)-(x^6/6!)+.... Serisinin ilk 50 teriminin toplamını veren bi prog yazınız
bu ve buna benzer bi kaç örnek var yardımcı olabilen msj atarsa sevinirim

http://www.turkforum.net/forumdisplay.php?f=120
öncelikle bu tip konularla ilgili sorularınızı ilgili bölüme yazınız
ne tür bir yardıma ihtiyacınız var?

onuda yaptım belki buradan da bi el uzanır die burayada yazdım.
neyse yazdığım örnek gibi bi kaç örnek var onların çözümleri aradığım şey

Kod:

cls
dım sonuc as double
dım t as ınteger
dım tf as double
dım x as double
dım x2 as double

ınput "x degerını gırınız"; x
x2 = x
tf = 1
sonuc = 1 - (x \ tf)
for t = 2 to 50
  tf = tf * t
  x2 = x2 * x
  ıf (t mod 2) = 1 then
    sonuc = sonuc - (x2 \ tf)
  else
    sonuc = sonuc + (x2 \ tf)
  end ıf
next t

prınt sonuc

10 yıl aradan sonra anca bu kadar oluyor
bir overflow hatası veriyor.double'dan büyüğünü bulamadım.

tşk ederim bugün sınavımdı artık bakalım hayırlısı))