Форум программистов, компьютерный форум, киберфорум
Fortran
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Fortran Найти наименьший элемент массива А(10). Правильно ли написана программа? https://www.cyberforum.ru/ fortran/ thread1245143.html
Написал программку, нужно найти наименьший элемент массива А(10). Кому не сложно, нужно проверить, и подсказать ошибки. program p1 dimension a(10) do i=1,10 read*,a(i) end do xmin=a(1) do i=1,10 if (a(i).lt.xmin) then xmin=a(i)
Настройка fortran Fortran
Ситуация такая. Запускается файлик с раширением .for из far commander двойным кликом он у меня открывается в редакторе lexicon 1.4, там редактируется код. Сохраняется файлик в этом lexicon. Потом нажимаю в лексиконе кнопку "выход" и этот файлик .for автоматом запускается в fortran 77 v5.00. Все это происходит на настроенном компьютере. Сейчас у меня такая ситуацция на новом компьютере, что...
Fortran Найти минимальный элемент массива, и вывести его на экран (Fortran77) https://www.cyberforum.ru/ fortran/ thread1236715.html
Ребят, помогите, нужно написать простенькую программку на фортране 87. Требуется найти минимальный элемент массива А(10), и вывести его на экран. Кому не сложно помогите, задали лабу, а практики совсем мало было, ничего не понял. Заранее спасибо)
Fortran Перевод программы Fortran в Matlab https://www.cyberforum.ru/ fortran/ thread1236553.html
ищу программиста для перевода программы фортрана в матлаб за вознаграждение
Как программно избавиться от окна - Program terminated with exit code 0 Fortran
Windows 7 64бит стоит. IVF интегрирован в VS2010. Собираю проект QuicWin application. Что нужно сделать, чтобы при нормальном завершении .exe файла не выскакивало окно с текстом: Program terminated with exit code 0 Exit Window? И требуется нажать - да или нет кнопку Мне нужно чтобы окошко выскакивало только при ошибках. Может, что в настройках нужно сделать? Мучаюсь уже неделю,...
Fortran Как откомпилировать программы написанные на Фортране-95 с использованием утилиты make? Очень нуждаюсь в совете - как в среде Windows откомпилировать готовые исходные тексты программ, написанные на Фортране-95 с использованием утилиты make? В директории, где содержаться все "исходники", присутствует также Makefile...Собственно проблема в том, что насколько я понимаю, make - файлы относятся к Unix, а компиляцию мне придется делать в Windows. https://www.cyberforum.ru/ fortran/ thread1231668.html
Fortran Первый столбец матрицы записать сверху вниз, второй снизу вверх program matrix12 real a(100,100) print *, 'Введите кол-во строк' read *, m print *, 'Введите кол-во столбцов' read *, n do i=1,m print '(1x,a,i2)', 'Введите элементы строки', i https://www.cyberforum.ru/ fortran/ thread1227876.html Перевод с Фортрана на VBA Fortran
Не уверен нужно ли создавать отдельную тему, поэтому пишу здесь. Если что-то не так, прошу прощения. С фортраном вообще не знаком. Во вложении есть блок-схема и код с Фортран IV. Я буду в VBA в Excel записывать этот алгоритм. Проблема в том, что я не понимаю синтаксиса Фортрана и не могу разобраться с Фортрановым IF, write, read, format, dimension. С Паскалем дружу, потому можно код и в нем...
Fortran Fortran и Pascal ABC Вот решил перевести код с Pascal ABC на Fortran. Но значения r1 и r2 разные выходят. Где в фортране допустил ошибку??? for i:=1 to 100 do begin for j:=1 to 100 do begin r1:=sqrt(sqr(x2)+sqr(y2)+sqr(z2)); r2:=sqrt(sqr(x2-x1)+sqr(y2-y1)+sqr(z2-z1)); L:=r2-r1; A:=(sqr(A1)/sqr(r1))+(sqr(A2)/sqr(r2))+((2*A1*A2*cos(10000.3*L))/(r1*r2)); y2:=y2+0.1; end; x2:=x2+0.1; y2:=0; end; do... https://www.cyberforum.ru/ fortran/ thread1224680.html Fortran Извлечение данных из файла https://www.cyberforum.ru/ fortran/ thread1222647.html
Здравствуйте, уважаемые форумчане. Я приступаю к изучению Fortranа. Передо мной стоит задача написания программы по извлечению данных из файла. Помогите, пожалуйста, в общих чертах с вопросом: какую литературу почитать для постепенного освоения всех шагов решения данной задачи?
Найти слова палиндромы Fortran
Помогите решить задачу. Дано предложение в котором все слова разделены запятой или пробелом. Найти и напечатать все слова, которые представляют собой слово - палиндром. Спасибо!
Fortran Метод хорд https://www.cyberforum.ru/ fortran/ thread1222479.html
Вообщем в программировании я новичок. попробовал написать, но ничего толком не получилось. помогите пожалуйста, кто в этом разбирается.Дано действительное положительное число ε. Найти с помощью метода хорд корни уравнения x^3-6x^2+12x+5=0 точностью ε. корень я нашел. он лежит в промежутке .
294 / 206 / 2
Регистрация: 20.02.2011
Сообщений: 551
03.09.2014, 14:27 0

Пропуск отрицательных элементов - Fortran - Ответ 6573531

03.09.2014, 14:27. Показов 869. Ответов 2
Метки (Все метки)

Ответ

Не понял, почему там при объявлении массива берется a+1. Похоже, что это перевод с С, где элементы массива считаются с нуля. Ну, у нас тут Фортран, и разными выкрутасами мозги никто никому не парит...
if ( beta (i,j) <= -1.0 ) then
write ( *, '(a)' ) 'Error!'
Вас же просили найти и отринуть отрицательные элементы, т. е. сравнивать элементы с нулем, а не такие выкрутасы выделывать! Откуда, кстати, Вы их (выкрутасы) взяли? Наверно, все тот же перевод с С...

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

Найти наибольший из положительных элементов и число отрицательных элементов в массиве
Найти наибольший из положительных элементов массива x={x1, x2, …, x20} и количество отрицательных...

Найти сумму отрицательных элементов массива вывести на экран индексы всех отрицательных элементов
дан масcив в котором N чисел. найти сумму отрицательных элементов массива вывести на экран индексы...

Найти сумму отрицательных элементов побочной и количество отрицательных элементов главной диагонали матрицы
Найти сумму отрицательных элементов побочной диагонали и количество отрицательных элементов главной...

Исправить код, чтобы он считал не сумму отрицательных элементов, а количество отрицательных элементов?
Доброго времени суток. Есть код #include &lt;iostream&gt; using namespace std; #define I 3 #define...

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

Описать функцию, которая найдет количество отрицательных элементов массива и наибольшее из отрицательных
Проинициализировать массив. Описать функцию, которая найдет количество отрицательных элементов...

Даны массивы А(15 элементов) и В(5 элементов)!Построить массив С,состоящий из отрицательных элементов этих двух
Даны массивы А(15 элементов) и В(5 элементов)!Построить массив С,состоящий из отрицательных...

Сумму элементов в тех столбцах, которые не содержат отрицательных элементов и минимум среди сумм элементов диагоналей
Дана целочисленная квадратная матрица. Найти 1. сумму элементов в тех столбцах, которые не содержат...

Вычислить сумму элементов с индексами кратными 2, среднее арифметическое всех четных элементов, произведение отрицательных элементов
привет ..ребят помогите пожалуйста Дан двумерный массив Х размером n*m, заполненный случайными...

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