Вычислить сумму всех...

Тема в разделе "Информатика", создана пользователем света, 5 мар 2010.

  1. света

    света New Member

    Вычислить сумму всех четных натуральных чисел меньше данного n . задача поинформатике
     
    света, 5 мар 2010
    #1
  2. Nitron

    Nitron New Member

    СLS
    INPUT n
    FOR i = 1 TO n
    IF INT(i/2) = i/2 THEN s=s+i
    NEXT i
    PRINT "сумма равна"; s
    END
     
    Nitron, 5 мар 2010
    #2

Поделиться этой страницей

Наша группа