Помогите в написании программы на QBasic

Тема в разделе "Другие языки", создана пользователем KPACHODAP, 23 май 2008.

Статус темы:
Закрыта.
Модераторы: Цукер
  1. KPACHODAP

    KPACHODAP DELETED

    Регистр.:
    21 дек 2009
    Сообщения:
    641
    Симпатии:
    111
    Прошу не ругать администраторов за то чно не правильной теме создал или разделе

    Нужно СРОЧНО!

    Народ привет, помогите написать прогу на QBasic отблагодарю 300 руб на мобилу, есть на яндек больше нет к сожалению. Или перешлю. Срочно!

    Условие:

    Составьте программу вычисления суммы 80 первых членов арифметической прогрессии, если

    a1=10; d=3

    F(x) = {
    sin x , x>=9
    (x^2)/(x-9) , x<9

    Чтобы можно было вводить x а после она вычисляла F

    Всем спасибо за ранее.!!!
     
  2. Лариса

    Лариса Читатель

    Заблокирован
    Регистр.:
    21 сен 2007
    Сообщения:
    390
    Симпатии:
    128
    радость моя:)..а не склеил случайно два задания? :D

    вот тебе вычисление прогрессии

    PHP:
    cls 
    input 
    "vvedite  1 chislo";a1
    Sum
    =0
    input 
    "vvedite raznost' ";d
    a
    =a1
    for i1 to 80
     Sum
    =Sum+a
     a
    =a+d
    next i
    print "Sum=";Sum
     
  3. lobzik

    lobzik

    Регистр.:
    8 авг 2006
    Сообщения:
    311
    Симпатии:
    49
    a1=10; d=3 с этим понятно. А это что?
    Если х меньше девяти то F(x)=(x^2)/(x-9) , если больше, то F(x)=sin(x), так?
     
  4. Лариса

    Лариса Читатель

    Заблокирован
    Регистр.:
    21 сен 2007
    Сообщения:
    390
    Симпатии:
    128
    Что касательно второго задания, видимо, там проверка знаний условного оператора (в колледжах и школах такое дают)

    PHP:
    cls
    input x
    If x>=9 then F=SIN(x) else F=(x^2)/(x-9)
    но , это если не пользоваться DEF Fn
    т.е. процедурой-функцией.

    вроде, синтаксис не перепутала, хотя склеивается с VB и pascal
     
  5. KPACHODAP

    KPACHODAP DELETED

    Регистр.:
    21 дек 2009
    Сообщения:
    641
    Симпатии:
    111
    Народ простите, я реально лохонулся, тут 2 задания было, простите реально.

    1. Составьте программу вычисления суммы 80 первых членов арифметической прогрессии, если a1=10; d=3.

    2. Система

    F(X) = {
    sin X , X>=9
    (X^2)/(X-9) , X<9

    Х^2 - х в степени 2
    X>=9 - х больше либо равно девяти

    Чтобы можно было вводить значение Х а после она вычисляла системы F(X)

    В сем спасибо. Кто Лариса напиши куда тебе переслать в личку!

    Добавлено через 4 минуты
    А можно так написать?

     
  6. Лариса

    Лариса Читатель

    Заблокирован
    Регистр.:
    21 сен 2007
    Сообщения:
    390
    Симпатии:
    128
    можно, конечно. только тебе же что-то с этой F дальше делать нужно:)
     
  7. KPACHODAP

    KPACHODAP DELETED

    Регистр.:
    21 дек 2009
    Сообщения:
    641
    Симпатии:
    111
    Решить! то бишь когда я ввожу Х чтобы вычисляло значение F(X), решало систему неравенств!
     
Статус темы:
Закрыта.