1. Наш канал codeby в telegram. Пишем об информационной безопасности, методах защиты информации, о программирован. Не пропускай новости с кодебай, будь в тренде ! Подробнее ...

    Скрыть объявление
  2. Чат codeby в telegram перезагрузка. Обсуждаем вопросы информационной безопасности и методы защиты информации, программирование. Задавайте свои вопросы и комментируйте чужие. Подробнее ...

    Скрыть объявление

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

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

  1. Гость

    Репутация:
    0
    исходные данные: 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
     
Загрузка...

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