Вход через социальные сети

  • 10.11.2011, 16:38
    0 up down
    Сообщение
    Komuccap в 10.11.2011, 5:41 написал(а): link

    Помогите пжлста. Мне надо затабулировать функцию р=sin(f/2), заданную полярными координатами с помощью Visual Fortran.
    Что я не так сделал, что нужно исправить чтобы в екселе получился график 1). Пока он мне рисует только правую часть 2)

    program lab1
    real a,b,h,x,y
    integer i,N
    open(10,file='lab1.txt')
    a=-7
    b=1
    N=31
    h=(b-a)/(N-1)
    do i=1,N
    f=a+h*i
    r=sin(f/2)
    x=r*cos(f)
    y=r*sin(f)
    print*,x,y
    write(10,*)x,y
    end do
    end


    На первом рисунке же ясно написано " \theta from 0 to 4\pi". А у тебя отрезок от -7 до 1

    8<4piВозьми для верности от -7 до 7
  • 28.05.2017, 09:36
    0 up down
    Сообщение

    У вас неверный алгоритм.

    1. Итак задается x

    2. Теперь надо вычислить y 

    Так как x = r cos(f) = sin(f/2)cos(f), то отсюда находите f

    и далее по формуле y = r sin(f) = sin(f/2)sin(f) вычисляете y

    3. Остается только записать все это в файл.

  • 04.06.2017, 19:05
    0 up down
    Сообщение

    только один компьютер использует правило pri sc для интернета но он в США и связь будет у него в будущем