Все, что могу:
.f77xm
*
FORTRAN-77 V5.0A
Взял у form
- - - Добавлено - - -
Попробовал аналогичную прогу на С:
#include <stdio.h>
#define N 20
int main()
{
int i;
static double o1, o2, v1, v2, v3, v4;
for(i=0; i<N; i++)
{
o1=i+1; o2=o1; v1=o1+o2; v2=o1-o2;
v3=o1*o2; v4=o1/o2;
}
}
Все работает, однако есть но:
у F77 деление командой DIVD, у С - DIVF
То есть С работает с фортрановским real*4, хотя указан double и резервируется именно 8 байт на переменную.
Как в С включить работу с double я не нашел.





Ответить с цитированием