Решение Выражений В Fortran

Тема в разделе "Другие", создана пользователем -, 1 ноя 2011.

  1. Гость

    исходные данные: X=(23+SIN(A)*COS(D)+567*LOG10(С)+N**2+LOG10(78)+ACOS(С))/(SQRT(ATAN(A)+5+N*TAN(A)+C**4))
    D - целая часть от А/В, С - дробная часть от В/А, N - случайное число от 0 до В.

    на данный момент я написал этот текст, но он не идет. в чем проблема? или где ошибка?

    PROGRAM LAB_2
    READ *,A,B,N
    PRINT *,'ЛАБОРАТОРНАЯ РАБОТА №2'
    PRINT *,'ВЫПОЛНИЛ:СТУДЕНТ ЭЭ-21-11, СИЛАНОВ'
    PRINT *,'ЗАДАНИЕ: РЕШЕНИЕ ВЫРАЖЕНИЯ С ПОМОЩЬЯ ФОРТРАН'
    PRINT *,'ВЕДЕНИЕ ЧИСЛА A'
    READ A
    PRINT *,'ВЕДЕНИЕ ЧИСЛА B'
    READ B
    D=INTEGER(A/:)
    C=REAL( B )/REAL(A)-INTEGER(B/A)
    X=(23+SIN(A)*COS(D)+567*LOG10(С)+N**2+LOG10(78)+ACOS(С))/(SQRT(ATAN(A)+5+N*TAN(A)+C**4))
    PRINT *,'X=
    PRINT *,'КОНЕЦ РАБОТЫ'
    END
     
Загрузка...
Похожие Темы - Решение Выражений Fortran
  1. paxac
    Ответов:
    0
    Просмотров:
    42
  2. aameno2
    Ответов:
    0
    Просмотров:
    220
  3. Даниил
    Ответов:
    0
    Просмотров:
    817
  4. sonia2000
    Ответов:
    0
    Просмотров:
    960
  5. Statussrg
    Ответов:
    1
    Просмотров:
    1.068

Поделиться этой страницей