2014 dxdy logo

Научный форум dxdy

Математика, Физика, Computer Science, Machine Learning, LaTeX, Механика и Техника, Химия,
Биология и Медицина, Экономика и Финансовая Математика, Гуманитарные науки




Начать новую тему Ответить на тему На страницу Пред.  1, 2, 3, 4, 5, 6
 
 Re: Вопрос по языку FORTRAN
Сообщение15.02.2014, 21:59 
Заслуженный участник
Аватара пользователя


30/01/06
72407
x51 в сообщении #826920 писал(а):
Munin, а ошибки нет

Есть, если два разных текста программы, которые должны компилироваться в абсолютно одинаковые программы, дают разные результаты.

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение06.03.2014, 07:30 


08/02/14
8
Доброе время суток!
Прошу помощи.
Как можно в фортране задать функцию ux(x,y)=1, которая дальше будет использоваться в уравнении, а х и у меняются пока выполняется условие do while($x^2+y^2\geqslant1$.OR.x>0)
заранее спасибо

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение06.03.2014, 18:11 


08/02/14
8
sssveta в сообщении #833263 писал(а):
Доброе время суток!
Прошу помощи.
Как можно в фортране задать функцию ux(x,y)=1, которая дальше будет использоваться в уравнении, а х и у меняются пока выполняется условие do while($x^2+y^2\geqslant1$.OR.x>0)
заранее спасибо

или просто как задать функцию ux(x,y)?

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение13.03.2014, 16:03 


08/02/14
8
опять я надеюсь на помощь. последние два сообщения про функцию уже не актуальны - проблема решена. но теперь появилась новая.
в файл вывода мне нужно чтобы в строчку вывелись параметры
Код:
write(1,*) x,y,vx,vy,t,st

но x,y,vx,vy он пишет в первую строчку, а t и st переносит на следующую.
Как быть? Спасибо заранее за помощь)

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение13.03.2014, 16:46 
Заслуженный участник


16/02/13
4179
Владивосток
А файл-то текстовый или бинарный? Если текстовый, откройте для себя оператор FORMAT, так, кажись, и всё, с ним связанное.

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение13.03.2014, 17:01 


08/02/14
8
iifat в сообщении #836391 писал(а):
А файл-то текстовый или бинарный? Если текстовый, откройте для себя оператор FORMAT, так, кажись, и всё, с ним связанное.

спасибо)) уже сама смогла сделать))

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение18.05.2015, 21:37 


27/03/12
23
Народ! Имеется программа на фортране (для старой машины типа ЕС-1060).
А также есть описание и выходной файл.
Может кто помочь откомпилировать под Powerstation или Compaq Fortran?

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение18.05.2015, 23:09 
Заслуженный участник


09/05/12
25179
Mavlik в сообщении #1016923 писал(а):
Народ! Имеется программа на фортране (для старой машины типа ЕС-1060).
А также есть описание и выходной файл.
Может кто помочь откомпилировать под Powerstation или Compaq Fortran?
А в чем конкретно состоят сложности?

Просто, с одной стороны, упомянутые компиляторы сейчас уже лишь немногим свежее, чем ЕС-1060, с другой - проблемы с обратной совместимостью в Фортране встречаются редко. Возможно, проще будет рассказать, как поправить какую-нибудь одну конкретную строчку.

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение19.05.2015, 00:03 


27/03/12
23
Можно и одну.
Ругается на строчку
ACCEPT"COUNT A? Y-1 N-2",IG0
Далее идет строка.
GO TO(33,44)IG0

F:\Angle\ANGLET2.FOR(64) : Error: First non-blank character in a character type format specifier must be a left paren. ['COUNT A? Y-1 N-2']
ACCEPT"COUNT A? Y-1 N-2",IG0

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение19.05.2015, 00:53 
Заслуженный участник


09/05/12
25179
Mavlik в сообщении #1016984 писал(а):
ACCEPT"COUNT A? Y-1 N-2",IG0
М-да, это серьезно. :D Насколько я помню, эта конструкция должна читать значение в переменную IG0 из файлов, открытых под номерами Y-1 или N-2 в зависимости от содержимого переменной A (если она нуль - из второго, если нет - из первого). Т.е. ее можно переписать как
Используется синтаксис Fortran
IF(A .EQ.0) THEN
READ(N-2,*) IG0
ELSE
READ(Y-1,*) IG0
END IF
 
Хотя, честно сказать, до конца не уверен. Второй вариант - не читать из файла значение, а просто брать его равным какому-то из этих двух выражений (хотя это тогда какое-то локальное расширение ЕС-1060). Пожалуй, все-таки одной строчки мало... скиньте-ка код целиком в ЛС, если он не очень большой.

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение19.05.2015, 03:16 
Заслуженный участник


16/02/13
4179
Владивосток
Pphantom в сообщении #1016962 писал(а):
проблемы с обратной совместимостью в Фортране встречаются редко
Вспоминается статеечка о сравнении компиляторов Фортрана. Оператор goto 5 действительно везде исполняется одинаково. Прочие хоть с маленькими, да особенностями.

-- 19.05.2015, 11:39 --

Фортранов, кстати говоря, на ЕС было четыре или пять. Там в комментариях не уточняется, какой именно?

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение19.05.2015, 17:40 
Заслуженный участник


09/05/12
25179
Pphantom в сообщении #1017004 писал(а):
М-да, это серьезно. :D Насколько я помню, эта конструкция должна читать значение
Все, дошло. :mrgreen: Обе мои исходных гипотезы были дурацкими, а правильный ответ совсем смешной. Строчка
Mavlik в сообщении #1016984 писал(а):
ACCEPT"COUNT A? Y-1 N-2",IG0
переводится как:
Используется синтаксис Fortran
write(*,*) "Вычислить A? 1 - да, 2 - нет:"
read(*,*) IG0

:facepalm:

-- 19.05.2015, 17:41 --

iifat в сообщении #1017012 писал(а):
Фортранов, кстати говоря, на ЕС было четыре или пять. Там в комментариях не уточняется, какой именно?
Нет. Я повелся на тетрарный оператор в качестве расширения языка, а все оказалось намного проще.

 Профиль  
                  
 
 Re: Вопрос по языку FORTRAN
Сообщение19.05.2015, 18:36 
Заслуженный участник


16/02/13
4179
Владивосток
Pphantom в сообщении #1017301 писал(а):
переводится как
Тьфу, ёлки ж. Да, это Фортран :wink:

 Профиль  
                  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 88 ]  На страницу Пред.  1, 2, 3, 4, 5, 6

Модераторы: Karan, Toucan, PAV, maxal, Супермодераторы



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group