'kupkok alma CLS INPUT "kupkoku alinacak sayi=", b INPUT "adim sayisi=", n INPUT "baslangic degeri=", x0 INPUT "deltay giriniz=", delta INPUT "epsilonu giriniz=", eps sayac = 0 islem: sayac = sayac + 1 x = (2 / 3) * (x0 + b / (2 * x0 * x0)) fonk = x * x * x - b PRINT sayac, x, fonk IF ABS(fonk) <= eps THEN PRINT "eps de durdu" END END IF IF ABS(x - x0) <= delta THEN PRINT "delta da durdu" END END IF IF sayac >= n THEN END x0 = x GOTO islem