Важная информация
Страница 1 из 3 123 ПоследняяПоследняя
Показано с 1 по 10 из 23

Тема: QBasic. Подпрограммы.

  1. #1 QBasic. Подпрограммы. 
    Новичок
    Регистрация
    13.05.2011
    Сообщений
    15
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    Вобщем осталось две задачи сдать по информатике, чтобы получить зачёт. Одна из них подпрограммы, другая массивы. Прошу помочь с подрограммами. Вот само задание:
    Составить программу, которая для каждого значения переменной х из указанного промежутка с указанным шагом вычисляет и печатает значение суммы конечного числа слогаемых. Программу составить таким образом, чтобы количество слогаемых было произвольным и вводилось с клавиатуры. Сделать две распечатки результатов: одну - для двух слагаемых, а другую - для числа слагаемых, указанных в решении.


    [Ссылки могут видеть только зарегистрированные пользователи. ]

    Надеюсь на вашу помощь =) Заранее спасибо =)
    Последний раз редактировалось NaymbI4; 13.05.2011 в 22:21.
    Ответить с цитированием  
     

  2. #2  
    Гуру Аватар для Абадябер
    Регистрация
    09.12.2010
    Адрес
    Беларусь, Минск
    Сообщений
    1,219
    Сказал(а) спасибо
    302
    Поблагодарили 176 раз(а) в 144 сообщениях
    Записей в блоге
    5
    Ссылка на файл не работает.
    Дружба-магия-радость!
    Ответить с цитированием  
     

  3. #3  
    Новичок
    Регистрация
    13.05.2011
    Сообщений
    15
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    Заменил ссылку. Должно работать. Надеюсь на вашу помощь =)
    Ответить с цитированием  
     

  4. #4  
    Супер модератор Аватар для Kakos_nonos
    Регистрация
    07.01.2011
    Адрес
    Кубань
    Сообщений
    1,531
    Сказал(а) спасибо
    126
    Поблагодарили 428 раз(а) в 291 сообщениях
    Записей в блоге
    6
    А там на формуле есть переменная Ln. Её с клавиатуры вводить?
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Ответить с цитированием  
     

  5. #5  
    Новичок
    Регистрация
    13.05.2011
    Сообщений
    15
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    Да, как же ещё)
    Я короче сделал программу эту. Она написана правильно. Но где-то сделал мааааленькую ошибку и преподша не говорит ошибку говорит пока не найдёшь я тебе зачёт за семестр не поставлю =(
    Если надо могу выложить, то что я написал там
    Ответить с цитированием  
     

  6. #6  
    Супер модератор Аватар для Kakos_nonos
    Регистрация
    07.01.2011
    Адрес
    Кубань
    Сообщений
    1,531
    Сказал(а) спасибо
    126
    Поблагодарили 428 раз(а) в 291 сообщениях
    Записей в блоге
    6
    Да, выложите, пожалуйста, попробую найти ошибку.
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Ответить с цитированием  
     

  7. #7  
    Новичок
    Регистрация
    13.05.2011
    Сообщений
    15
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    Код :
    Declare SUB sum (x,n,y)
    Input "кол.шаг";n
    For x:= .1 to .8 STEP .1
    Call sum (x,n,y)
    PRINT "x=" ; x, "y= ";y
    Next x
    End
     
    _______________________________
     
    ПодПрограмма
    ________________________ 
     
    SUB sum (x,n,y)
    y=0
    F=1 
    For K=1 to n
    f=f*k
    y=(Log(x)^k*3*x^k))/f             |<- уверен там есть ошибка
    Next k
    End sub
    _______________________

    Вот что я смог осилить. Ошибка есть в написани уравнения и ещё гдето.......
    Ответить с цитированием  
     

  8. #8  
    Супер модератор Аватар для Kakos_nonos
    Регистрация
    07.01.2011
    Адрес
    Кубань
    Сообщений
    1,531
    Сказал(а) спасибо
    126
    Поблагодарили 428 раз(а) в 291 сообщениях
    Записей в блоге
    6
    Там в подпрограмме в вычислении функции лишняя скобка стоит. Y=0 можно убрать. Может факториал вычислять циклом при каждом цикле, а то этот метод хороший, но не сразу доходит, что это так. Тоесть вместо F=F*K поставить
    Код qbasic:
    F=1
    FOR y=1 TO k
    f=F*Y
    NEXT y
    И ещё: программа работает? Т. Е. Запускали?
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Ответить с цитированием  
     

  9. #9  
    Новичок
    Регистрация
    13.05.2011
    Сообщений
    15
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    запускаю, ставлю шаг = 0.1
    он мне выдаёт такую картину:
    x=.1 y=1
    x=.2 y=1
    x=.3 y=1
    x=.4 y=1
    x=.5 y=1
    x=.6 y=1
    x=.7 y=1
    Ответить с цитированием  
     

  10. #10  
    Супер модератор Аватар для Kakos_nonos
    Регистрация
    07.01.2011
    Адрес
    Кубань
    Сообщений
    1,531
    Сказал(а) спасибо
    126
    Поблагодарили 428 раз(а) в 291 сообщениях
    Записей в блоге
    6
    n это не шаг, а количетво складыааний. Его надо поставить после STEP. А колочество складываний, судя по формуле, должно быть 10.
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Ответить с цитированием  
     

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

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

Похожие темы

  1. подпрограммы-процедуры
    от Альберт в разделе Turbo Pascal
    Ответов: 1
    Последнее сообщение: 15.06.2011, 19:19
  2. Функции и подпрограммы
    от nikita в разделе QBasic
    Ответов: 0
    Последнее сообщение: 04.05.2011, 17:37
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •