Полезное:
Как сделать разговор полезным и приятным
Как сделать объемную звезду своими руками
Как сделать то, что делать не хочется?
Как сделать погремушку
Как сделать так чтобы женщины сами знакомились с вами
Как сделать идею коммерческой
Как сделать хорошую растяжку ног?
Как сделать наш разум здоровым?
Как сделать, чтобы люди обманывали меньше
Вопрос 4. Как сделать так, чтобы вас уважали и ценили?
Как сделать лучше себе и другим людям
Как сделать свидание интересным?
Категории:
АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника
|
Ильин Ю.ПНачало работы в среде разработки Фортран-программ Методические указания Ильин Ю.П.
1. Загрузить программу MSDEV.EXE (Фортран) 2. В окне текстового редактора набрать текст фортран-программы. (Меню: File\New…\Text File => Ok) 3. Запустить компиляцию. (Меню: Build\Compile) => появится сообщение: 4. Выбрать “Yes” => появится диалоговое окно для выбора имени файла программы и места для размещения рабочей области Вашего проекта:
5. Выбрать папку и имя файла фортран-программы (оставьте стандартное расширение имени файла *.f90) => Ok 6. Посмотреть сообщение компилятора, нет ли синтаксических ошибок. Если есть ошибки, то надо их устранить, прежде чем переходить к следующему этапу.
7. Запустить программу в отладочном режиме. (Меню: Build\Debug… Go) => появится сообщение: 8. Выбрать “Yes” => появится окно консольногоприложения, в котором будет отображаться работа программы: 9. Ввести необходимые исходные данные, разделяя их пробелами, и нажать клавишу ENTER для завершения ввода => появится результат: 10. Проанализировать результат, после чего нажать клавишу ENTER для завершения работы программы и возврата в окно текстового редактора.
*********************************************************************** program te implicit none real a, b
write(*,*) ' Vvedite znachenie ugla v gradusah ==> ' read(*,*) a a=a*4.0*atan(1.0)/180.0 b=sin(a)**2+cos(a)**2
write(*,*) ' OTVET: trig ed=', b pause end program
***********************************************************************
Vvedite znachenie ugla v gradusah ==> OTVET: trig ed= 1.000000 Pause - Please enter a blank line (to continue) or a DOS command.
***********************************************************************
|