• Найти среднее арифметическое чисел от 1 до n( n- вводится с клавиатуры)
    В Basic - 256....
    Составить не менее 2 видов циклов.

Ответы 5

  • А если циклом с параметром?
    • Автор:

      angelldi3
    • 6 лет назад
    • 0
  • и постусловием?
  • в данном алгоритме представлен цикл с параметром. Можно заменить цикл на постусловие с помощью опрераторов Do While и Loop:clsrem alet sum=0let sred=0let n=0let i=1input "n=";nDo While i <= ninput bsum=sum+bLoopsred=sum/nprint "Sred = ";sredend
    • Автор:

      obiemoon
    • 6 лет назад
    • 0
  • Не дописал.clsrem alet sum=0let sred=0let n=0let i=1input "n=";nDo While i <= ninput bsum=sum+bi = i + 1Loopsred=sum/nprint "Sred = ";sredend
    • Автор:

      nikofknc
    • 6 лет назад
    • 0
  • clsrem alet sum=0let sred=0let n=0let i=1input "n=";nfor i=1 to n step 1input bsum=sum+bnext nsred=sum/nprint "Sred = ";sredend
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years