Форум программистов, компьютерный форум, киберфорум
Fortran
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Fortran Как заменить нулем пробел? В заголовке бинарного файла лежат год, месяц и день начала записи файла, все integer(2). Нужно из них сформировать строковую константу вида 'YYYY-MM-DD'. Если месяц и день состоят из одной цифры, то получается, например так '2011- 1 -1', а нужно '2011-01-01'. Как ведущий пробел заменить нулем? Добавлено через 3 часа 55 минут Пока решил так: write(yyyy,'(I4)') year write(mm,'(I2)') month... https://www.cyberforum.ru/ fortran/ thread393082.html Fortran Не считываются числовые данные из файла в fortran 90 (компиляторы ifort, gfortran)
Здравствуйте, У меня возникла проблема при создании программы, которая записывает данные в файл. Данные в файл записываются, но не считываются. Точнее, считывается первые несколько полей, дальше программа выдаёт сообщение о конце файла (на самом деле в файле данные есть, открывалось редактором). Описание типа файла, данные из которого нужно записать type met_data integer ...
Fortran Дана матрица : A (7,8) . Помогите пожалуйста Дана матрица : A (7,8) Если в матрице диапазон изменения значений элементов ( разность между максимальным и минимальным значением) больше заданного числа, то подсчитать в матрице количество нечетных по значению элементов. В противном случае найти среднее арифметическое четных по значению элементов. https://www.cyberforum.ru/ fortran/ thread390522.html Fortran Вычислить k! (k - количество нулевых элементов в четных столбцах матрицы) https://www.cyberforum.ru/ fortran/ thread390399.html
uses crt; const m=3;n=8; var a:array of integer; i,j:integer; k,f:longint; begin k:=0;f:=1; for i:=1 to m do for j:=1 to n do
Определить, является ли число четным Fortran
Ребят, подскажите как в Fortran определить является ли число четным????
Fortran Даны вещественные числа a, b, c, d, e, f и g ФУНКЦИИ Даны вещественные числа a, b, c, d, e, f и g (вводятся из файла). Определить площадь многоугольника, изображенного на рисунке https://www.cyberforum.ru/attachment.php?attachmentid=108272&stc=1&d=1321890256 Указание. Для решения задачи следует определить функцию трех переменных, позволяющую определить площадь треугольника по известным длинам его сто- рон. https://www.cyberforum.ru/ fortran/ thread388746.html
Fortran Реализовать пузырьковую сортировку https://www.cyberforum.ru/ fortran/ thread388669.html
А как реализовать в фортране пузырьковую сортировку?
Настройки оптимизации в Intel Fortran Composer XE Fortran
Здравствуйте! Хотелось бы узнать у сведущих людей, каким образом можно оптимизировать код путем выставления соответствующих настроек в новом компиляторе от Intel. Процессор Intel Core i5. На вкладке Code Generation в свойствах фортрановского проекта есть 3 настройки: Enable Enhanced Instruction Set (варианты: Not Set, SSE2, SSE3, IA32) Add Processor-Optimized Code Path (...)
Fortran Реализовать умножение двух матриц А и В https://www.cyberforum.ru/ fortran/ thread387321.html
Доброго времени суток. Вот какое задание у нас, реализовать умножение двух матриц А и В, когда элементы этих двух матриц будут находится в одномерных массивах, постолбцовой структуры
Fortran Табулирование функций (уточнение) Есть функция abs(cos(3*x)). В Фортране мне её надо затабулировать. Проверьте пжлста коды. В екселе у меня получился график , но приподнятый по у вверх. program lab1 real a,b,h,x,y integer i,N open(10,file='lab1.txt') a=0 b=(2./3.)*(3.141593) N=31 h=(b-a)/(N-1) https://www.cyberforum.ru/ fortran/ thread387058.html
Найти произведение элементов первой половины массива, а вторую половину инвертировать Fortran
такая задача: дан одномерный массив из 18 элементов, надо найти произведение элементов первой половины массива, а вторую половину инвертировать (поменять местами девятый с восемнадцатым, десятый с семнадцатым и тд) помогите решить пожалуйста! произведение легко находится а вот как вторую половину инвертировать? :wall: заранее спасибо!
Fortran Ветвящиеся вычислительные процессы Надо определить попадает ли точка в область определения. Проверьте пжлста что не так? program lab2 real x,y,z,R integer M R=1.0 print*,' x=?';read*,x print*,' y=?';read*,y if(x<=0.0.AND.y>=-2.AND.x>=-1.AND.x>=0.0.AND.y>=x-2..OR.x*x+y*y<=R*R) then z=1/sin(x)+alog(abs(y)) M=1;print*,'YES' https://www.cyberforum.ru/ fortran/ thread385294.html
0 / 0 / 0
Регистрация: 28.11.2011
Сообщений: 4
30.11.2011, 23:04  [ТС] 0

Перевести код с Паскаля на Фортран - Fortran - Ответ 2232919

30.11.2011, 23:04. Показов 2818. Ответов 9
Метки (Все метки)

Ответ

собсна, огромное вам спасибо за помощь.
знак, кстати менять не надо было. как показала практика, while и until одно и тоже.
а вот с командой mod вы написали всё верно.

есть ещё один вопрос, для самообразования: что именно эта команда выполняет? отбрасывает определённое количество цифр после запятой??

Вернуться к обсуждению:
Перевести код с Паскаля на Фортран Fortran
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.11.2011, 23:04
Готовые ответы и решения:

Каким образом можно перевести код Паскаля в код Фортран?
Здравствуйте уважаемые программисты! Может быть банальная, но довольно сложная проблема - перевод...

К сможет перевести простой код с Паскаля на Фортран?
С Фортрана на Паскаль можно конвертировать с помощью разных программ а обратной не нашла....

Перевести с Паскаля на Фортран
uses crt; type Link = ^Number; Number = record ID: integer; Cislo : real; NextRec: Link;...

Перевести из паскаля в фортран
program KAV; var a,b,c,r:real; begin writeln ('vvedite a,b,c'); readln (a,b,c); If (a&lt;&gt;0) and...

9
30.11.2011, 23:04
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.11.2011, 23:04
Помогаю со студенческими работами здесь

Перевести программу с паскаля на фортран, используя Параллельные вычисления и OpenMP
Есть несложная программа на паскале, надо ее перевести в фортран с помощью параллельных вычислений...

Как перевести код с паскаля на Java. Пытался сам но код не хочет работать переведенный
А сам код на паскале работает. Вот код на паскале var i,j,m,c,d: integer; A:array of...

Перевести код с Паскаля на С#
Помогите пожалуйста переделать код с Паскаля uses Graph, Crt; type mas= array of longint; ...

Перевести код с Паскаля на C#
program lm; uses crt; Type P= array of integer; M= array of integer; Var a:p; b:m;...

Перевести код с Паскаля на СИ
Попробовал перевести но выдает не те результаты. Не подскажите где ошибка? Program P1; Var Map:...

Перевести код с Паскаля на C
var f,g: text; s: string; begin assign(f,'F:\text1.txt'); assign(g,'F:\text2.txt');...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru