Главная Случайная страница


Полезное:

Как сделать разговор полезным и приятным Как сделать объемную звезду своими руками Как сделать то, что делать не хочется? Как сделать погремушку Как сделать так чтобы женщины сами знакомились с вами Как сделать идею коммерческой Как сделать хорошую растяжку ног? Как сделать наш разум здоровым? Как сделать, чтобы люди обманывали меньше Вопрос 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.

 

***********************************************************************

 


<== предыдущая | следующая ==>
Стандартные математические функции | Подставляем полученное соотношение в исходное уравнение

Date: 2015-09-24; view: 402; Нарушение авторских прав; Помощь в написании работы --> СЮДА...



mydocx.ru - 2015-2024 year. (0.006 sec.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав - Пожаловаться на публикацию