• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

    На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.

    Запись на курс до 25 апреля. Получить промодоступ ...

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

  • Автор темы Guest
  • Дата начала
G

Guest

исходные данные: 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
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!