Важная информация
Показано с 1 по 7 из 7

Тема: QBasic. Циклы.

  1. #1 QBasic. Циклы. 
    Новичок
    Регистрация
    16.04.2013
    Сообщений
    3
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    Вычислить значение многочлена Fn(x) = An*X^n + A(n-1)*X^n-1 + ... + A1*X + A0
    n, n-1, 1, 0 - индексы перед F, A
    Ответить с цитированием  
     

  2. #2  
    Новичок
    Регистрация
    29.05.2013
    Сообщений
    2
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    нужно найти среднее арифметическое всех цифр, входящих в число. (это по циклам)
    Ответить с цитированием  
     

  3. #3  
    Супер модератор Аватар для >Quiet Snow<
    Регистрация
    11.04.2011
    Адрес
    Планета земля
    Сообщений
    3,829
    Сказал(а) спасибо
    1,810
    Поблагодарили 934 раз(а) в 796 сообщениях
    Записей в блоге
    1
    Через строку, без проверки корректности ввода...
    Код qbasic:
    CLS
    LINE INPUT "Vvedi chislo: ", Ch$
    IF LEN(Ch$) THEN
      FOR i = 1 TO LEN(Ch$)
         S = S + VAL(MID$(Ch$, i, 1))
      NEXT
      S = S / LEN(Ch$)
      PRINT S
    END IF

    Числом...
    Код qbasic:
    CLS
    INPUT "Vvedi chislo: ", Ch&
      DO
         S = S + Ch& MOD 10
         K = K + 1
         Ch& = Ch& \ 10
      LOOP WHILE Ch&
      S = S / K
      PRINT S
    Обучение прикладному программированию(по skype), качественно, недорого, 18+, вопросы в личку.
    «Если вы ничего не сделаете, я уверяю вас, ничего и не произойдёт» © Жак Фреско
    Ограниченно модерирую.
    Ответить с цитированием  
     

  4. #4  
    Новичок
    Регистрация
    29.05.2013
    Сообщений
    2
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    Большое вам спасибо!!!
    Ответить с цитированием  
     

  5. #5  
    Новичок
    Регистрация
    30.05.2013
    Сообщений
    3
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    [Ссылки могут видеть только зарегистрированные пользователи. ] можете пожалуйста решить там во 2 степени и в 3
    Ответить с цитированием  
     

  6. #6  
    Новичок
    Регистрация
    11.06.2013
    Сообщений
    1
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    [Ссылки могут видеть только зарегистрированные пользователи. ]


    5й вариант помогите пожалуйста...
    Ответить с цитированием  
     

  7. #7  
    Супер модератор Аватар для >Quiet Snow<
    Регистрация
    11.04.2011
    Адрес
    Планета земля
    Сообщений
    3,829
    Сказал(а) спасибо
    1,810
    Поблагодарили 934 раз(а) в 796 сообщениях
    Записей в блоге
    1
    5й вариант помогите пожалуйста...
    Что не получается? Можно ваш ход мыслей и попытку решения...
    Обучение прикладному программированию(по skype), качественно, недорого, 18+, вопросы в личку.
    «Если вы ничего не сделаете, я уверяю вас, ничего и не произойдёт» © Жак Фреско
    Ограниченно модерирую.
    Ответить с цитированием  
     

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •