|
|
Другие темы раздела | |
Fortran Нужны комментарии к коду
https://www.cyberforum.ru/ fortran/ thread2740809.html program l3 implicit none integer, parameter :: n=6, nval=4 real, dimension(n) :: x,f,d real, dimension(2*n):: wk real, dimension(nval) :: xval, fval, dval logical :: spline=.true. integer :: ierr, i real :: lwk |
Нужны комментарии к коду Fortran program l2 implicit none integer, parameter :: lda=3, n=lda, itask=1 real :: a(lda,n), b(n), work(n), rcond integer :: iwork(n), ind a(1,1) = 6; a(1,2) = -1; a(1,3) = -1 a(2,1) = -1; a(2,2) = 6; a(2,3) = -1 a(3,1) = -1; a(3,2) = -1; a(3,3) = 6 |
Fortran Разъясните программу Написать программу для вычисления e^x для -1,-5,-10,-15 , используя разложение в ряд Тейлора. program l1 implicit none double precision, external :: expon integer :: x print*, "print x" read*, x print*, "exp", x, "=", expon(x) https://www.cyberforum.ru/ fortran/ thread2740748.html | Fortran Является ли целая квадратная матрица 6-го порядка «магическим квадратом» Определить, является ли заданная целая квадратная матрица 6-го порядка «магическим квадратом», то есть такой, в которой суммы всех элементов во всех строках и столбцах одинаковы. https://www.cyberforum.ru/ fortran/ thread2739294.html |
аппроксимация данных Fortran задали программу по аппроксимации данных из таблицы, пункт а я сделал, а вот как сделать в и с пункты не могу сообразить, может есть какие-то идеи вот пункт а program lab5 implicit none integer,parameter :: m,n=2,lda=m,itask=1 real,parameter :: tol=10**(-6) real, dimension(1:m,1:n):: a real, dimension(1:m):: b, v, rsd real, dimension(1:n):: x, qraux, work integer, dimension(1:n):: jpvt |
Fortran Сглаживание массива Сглаживание.Дан одномерный вещественный массив A размером 100.Каждый элемент массива A(кроме двух крайних ) заменить выражением a’i= ai-1+2ai+ai+1/4 , i=2,3,.....,n-1, А Крайние элементы -выражениями a’1= a1+a2/2; a’n=an-1+an/2 https://www.cyberforum.ru/ fortran/ thread2736058.html |
Fortran Параллельное программирование.Сложение матриц. Для задания значений элементов матриц используется рандом чисел
https://www.cyberforum.ru/ fortran/ thread2735137.html Посмотрев несколько книг,я не нашел или не понял как мне получить результат. PROGRAM RAND REAL A, A_RAND(0:3) REAL B, B_RAND(0:3) CALL RANDOM_NUMBER(A) CALL RANDOM_NUMBER(A_RAND) CALL RANDOM_NUMBER(B) CALL RANDOM_NUMBER(B_RAND) |
Fortran Написал программу для половинного деления, но количество итераций и сам результат странно выдает subroutine iteration(a,b,c,N,eps,f) external f real :: a,b,N,c do while (abs(a-b)>eps.or.N<10) c=(a+b)/2 if (f(a)*f(c)<0)then b=c else a=c end if |
Fortran Сравнение массивов Добрый день. Стоит такая задача. Имеются два набора координат - X и X1 (см. код). Для первого набора координат заданы значения функции - A. Далее необходимо сравнить между собой наборы координат (X и X1). Если координата из второго набора совпадает с координатой из первого, то ей присваивается соответствующее значение функции. Если не совпадает, то присваивается значение 0.2. Пример:... https://www.cyberforum.ru/ fortran/ thread2733548.html |
Fortran Найти положительные четные значения в целочисленном двумерном массиве С (3´6 элементов) и вычислить сумму их индексов
https://www.cyberforum.ru/ fortran/ thread2730335.html Матрицу привести смог, а дальше как "отрезать" четные числа от нечетных и засуммировать сумму индексов не пойму. Помогите пожалуйста. program MASSIVE integer, dimension(3, 6) :: MATRIX data MATRIX /1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18/ I=1; print*, (MATRIX(I, J), J = 1, 6) I=2; print*, (MATRIX(I, J), J = 1, 6) I=3; print*, (MATRIX(I, J), J = 1, 6) end |
Fortran Не понимаю как это работает в фортране Дана функция F = (x + max(x, y, z)) / (y^2 + max (y, z), вообще не знаю что писать и c чего начать. |
Fortran Не пойму как исправить исправить ошибку subroutine iteration(a,b,c,N) real :: a,b,N,c do while (abs(a-b)>eps.or.N<10) c=(a+b)/2 if (f(a)*f(c)<0)then b=c else a=c end if N=N+1 https://www.cyberforum.ru/ fortran/ thread2729272.html |
6838 / 4897 / 2068
Регистрация: 02.02.2014
Сообщений: 13,062
|
||||||
11.12.2020, 20:07 | 0 | |||||
С клавиатуры вводятся четыре целых числа. Написать и отладить программу - Fortran - Ответ 1508878111.12.2020, 20:07. Показов 1456. Ответов 17
Метки (Все метки)
Ответ
Вернуться к обсуждению: С клавиатуры вводятся четыре целых числа. Написать и отладить программу Fortran
1
|
11.12.2020, 20:07 | |
Готовые ответы и решения:
17
С клавиатуры вводятся 3 целых числа a, b, c. Составить программу С клавиатуры вводятся три целых числа- а,в,с. Составьте программу для определения и вывода сообщения Даны четыре произвольных числа a, b, c, d, которые вводятся с клавиатуры Числа вводятся с клавиатуры до тех пор, пока не напишем 0. Написать программу для вычисления |
11.12.2020, 20:07 | |
11.12.2020, 20:07 | |
Помогаю со студенческими работами здесь
0
С клавиатуры вводятся 3 целых числа: N, A и B (процедура 1) Они передаются в процедуру 2 С клавиатуры вводятся шесть целых чисел. Вывести все целые числа x [-10,10] С клавиатуры вводится четыре целых числа: v, r, p, b. На экран выводится одно целое число С клавиатуры последовательно вводятся 3 целых числа. Необходимо ввести их на экран в порядке возрастания С клавиатуры вводятся два целых числа. Сравнить эти числа. Результат вывести в виде 3<5 или 3=3, или 3>2 Написать программу, которая вводит с клавиатуры три целых числа и записывает в логическую переменную значение true, е |