2014 dxdy logo

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

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




На страницу Пред.  1, 2, 3, 4, 5, 6
 
 Re: Вопрос по языку FORTRAN
Сообщение15.02.2014, 21:59 
Аватара пользователя
x51 в сообщении #826920 писал(а):
Munin, а ошибки нет

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

 
 
 
 Re: Вопрос по языку FORTRAN
Сообщение06.03.2014, 07:30 
Доброе время суток!
Прошу помощи.
Как можно в фортране задать функцию ux(x,y)=1, которая дальше будет использоваться в уравнении, а х и у меняются пока выполняется условие do while($x^2+y^2\geqslant1$.OR.x>0)
заранее спасибо

 
 
 
 Re: Вопрос по языку FORTRAN
Сообщение06.03.2014, 18:11 
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 
опять я надеюсь на помощь. последние два сообщения про функцию уже не актуальны - проблема решена. но теперь появилась новая.
в файл вывода мне нужно чтобы в строчку вывелись параметры
Код:
write(1,*) x,y,vx,vy,t,st

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

 
 
 
 Re: Вопрос по языку FORTRAN
Сообщение13.03.2014, 16:46 
А файл-то текстовый или бинарный? Если текстовый, откройте для себя оператор FORMAT, так, кажись, и всё, с ним связанное.

 
 
 
 Re: Вопрос по языку FORTRAN
Сообщение13.03.2014, 17:01 
iifat в сообщении #836391 писал(а):
А файл-то текстовый или бинарный? Если текстовый, откройте для себя оператор FORMAT, так, кажись, и всё, с ним связанное.

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

 
 
 
 Re: Вопрос по языку FORTRAN
Сообщение18.05.2015, 21:37 
Народ! Имеется программа на фортране (для старой машины типа ЕС-1060).
А также есть описание и выходной файл.
Может кто помочь откомпилировать под Powerstation или Compaq Fortran?

 
 
 
 Re: Вопрос по языку FORTRAN
Сообщение18.05.2015, 23:09 
Mavlik в сообщении #1016923 писал(а):
Народ! Имеется программа на фортране (для старой машины типа ЕС-1060).
А также есть описание и выходной файл.
Может кто помочь откомпилировать под Powerstation или Compaq Fortran?
А в чем конкретно состоят сложности?

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

 
 
 
 Re: Вопрос по языку FORTRAN
Сообщение19.05.2015, 00:03 
Можно и одну.
Ругается на строчку
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 
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 
Pphantom в сообщении #1016962 писал(а):
проблемы с обратной совместимостью в Фортране встречаются редко
Вспоминается статеечка о сравнении компиляторов Фортрана. Оператор goto 5 действительно везде исполняется одинаково. Прочие хоть с маленькими, да особенностями.

-- 19.05.2015, 11:39 --

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

 
 
 
 Re: Вопрос по языку FORTRAN
Сообщение19.05.2015, 17:40 
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 
Pphantom в сообщении #1017301 писал(а):
переводится как
Тьфу, ёлки ж. Да, это Фортран :wink:

 
 
 [ Сообщений: 88 ]  На страницу Пред.  1, 2, 3, 4, 5, 6


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group