Форум программистов, компьютерный форум, киберфорум
Fortran
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.62/13: Рейтинг темы: голосов - 13, средняя оценка - 4.62
0 / 0 / 0
Регистрация: 12.12.2014
Сообщений: 5

Нужно довести до ума программу

26.04.2021, 07:34. Показов 3098. Ответов 23

Студворк — интернет-сервис помощи студентам
Добрый день! Нужно довести до ума программу.
Само задание звучит так: "Дан произвольный массив А(5). Найти наибольший элемент среди элементов с четными номерами."
Так как я ни разу не программист (вообще не понимаю, зачем мне будущему строителю знать как писать проги на фортране), то помогите доделать программу.
Собственно сам код:
Fortran
1
2
3
4
5
6
7
8
9
10
11
12
13
14
program hp
INTEGER, parameter :: A=5
REAL x(A), Xmax, l, b
write (*,*) "Введите элементы массива x:"
read*, x
b = mod(A, 2.)
Xmax=x(l)
do i=l,A
IF (Xmax<x(i)) THEN
Xmax=x(i); 
ENDIF
ENDDO
write (*,*) "Xmax=",Xmax 
END
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
26.04.2021, 07:34
Ответы с готовыми решениями:

Довести до ума программу
Прощу помощи в завершении программы. Сформировать квадратную матрицу для n=20 по заданному образцу при x=2. В полученной матрице найти...

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

Довести до ума имитационную модель глушилки GSM-900 диапазона
Доброго времени суток. Моя задача - сделать имитационную модель глушилки GSM-900 диапазона. Модель в LabVIEW есть, но и есть небольшая...

23
WH
1589 / 817 / 192
Регистрация: 10.09.2013
Сообщений: 3,293
Записей в блоге: 3
28.04.2021, 15:41
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от Catstail Посмотреть сообщение
- вы будете смеяться, но уже заявили...
Цитата Сообщение от Catstail Посмотреть сообщение
А людей надо учить вещам конкретным, практическим"
Самое главное - уметь считать деньги. Если умеешь считать деньги все будет в порядке, а какие-то там технические расчеты, кому они нужны? Я много лет отработал в электроэнергетике и знаю это не по наслышке. "Манагеры" считают, что достаточно скрутить 2 проводка и свет появится. Вот так вот. А деньги важнее, это да. Знаете основную версию заключения следственных органов о причинах пожара в "Зимней Вишне"?
2
29.04.2021, 00:02

Не по теме:

Цитата Сообщение от Catstail Посмотреть сообщение
Загляните сюда.
Мебель из массива сосны почти не делают потому что её нужно или долго сушить естественным способом, или дорого вакуумной сушкой, а ещё пропитывать, лачить и выходит дороже не только ДСП, но и МДФ.
Инженера электронщики никуда не делись, и, что бы проектировать РЭА с использованием микросхем, так же мозг нужен и соответствующее высшее образование. А от ваших рассуждений о бизнесе мне захотелось пойти записываться в коммунисты, хотя я и не коммунист.

Если выбирать 1 язык для инженеров, то это VBA, т.к. он в AutoCAD/Autodesk Inventor, excel, mathlab.
Я не фанат VBA, но из знакомых мне конструкторов, электронщиков, специалиста по логистике, пользуются именно VBA.
(из тех, кто вообще хоть чем то пользуется)

0
Супер-модератор
Эксперт функциональных языков программированияЭксперт Python
 Аватар для Catstail
38223 / 21155 / 4314
Регистрация: 12.02.2012
Сообщений: 34,765
Записей в блоге: 14
29.04.2021, 07:03
Цитата Сообщение от Curry Посмотреть сообщение
Мебель из массива сосны почти не делают потому что
- это по совокупности просто гораздо труднее. Аспектов тут много. Труднее - значит нужен квалифицированный труд.

Цитата Сообщение от Curry Посмотреть сообщение
чтобы проектировать РЭА с использованием микросхем, так же мозг нужен и соответствующее высшее образование
- да, конечно. В течение переходного периода это так. Но бизнес не стоит на месте. Тем не менее, сравните потребность в этой профессии сейчас и 40 лет назад. Тенденция очевидна.

Цитата Сообщение от Curry Посмотреть сообщение
А от ваших рассуждений о бизнесе мне захотелось пойти записываться в коммунисты
- не от "моих рассуждений". От самой сути. Мир так устроен, хотим мы этого или нет. Кое-что не нравится и мне... Но истина - прежде всего, не так ли?

Ваша попытка возразить на самом деле подтверждает высокую степень моей правоты.
0
29.04.2021, 12:11

Не по теме:

Цитата Сообщение от Catstail Посмотреть сообщение
сравните потребность в этой профессии сейчас и 40 лет назад. Тенденция очевидна.
Приведите ссылки по которым можно сравнить и увидеть эту тенденцию.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
29.04.2021, 12:11

Нужно довести программу до ума
помогите с кодом. uses crt { uses список использумых модулей,библиотека}{cathod ray tube модуль для работы с текстовой информацией на...

Нужно довести программу до ума(Сбалансированное дерево)
Помогите пожалуйста доделать метод main #include &lt;iostream&gt; #include &lt;cstdlib&gt; #include &lt;conio.h&gt; #include...

нужно довести до ума
Нужно заполнить матрицу по правилу 1 2 3 4 5 9 8 7 6 25 10 11 12 23 24 14 13 22 21 20 15 16 17 ...

довести до ума нужно
Подсчитать и вывести на экран количество пробелов во введенной строке. Уровень 2. Дополнительные условия: Ввести с клавиатуры число N. ...

Нужно довести до ума доказательство
У меня есть такое предложение: Пусть N-нормальная подгруппа группы G=(A*B,H=K,\varphi ), R=A\bigcapN, S=B\bigcapN. Тогда R и S-...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
24
Ответ Создать тему
Новые блоги и статьи
мат медиц модель 30. презентация проекта
anaschu 27.08.2026
хоп хоп хоп хидахоп, а я кладую))
Как у меня протекала болезнь
zorxor 27.08.2026
Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .
Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему
kumehtar 26.08.2026
ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .
[EasyBuilder Pro] Памятка по разработке для панелей Weintek
ФедосеевПавел 26.08.2026
Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .
Модель по догадкам
anaschu 25.08.2026
Прошло две недели. Я уже рассказывал, как разговаривал с сотрудниками у сортировки и как понял, что главная ветка — не про приёмку, а про отбор. Но тогда я думал, что понял механику. На этой неделе я. . .
Запись в регистр сведений независимо от заполненности табличной части
Maks 25.08.2026
Реализация из решения ниже выполнена на нетиповом документе с несколькими табличными частями, разработанного в КА2. Задача: Обеспечить запись документа в регистр сведений независимо от. . .
Ноутбук Альфария
kumehtar 24.08.2026
Встретился тут в сети ноутбук Альфария, примарха Альфа-Легиона. Хотя возможно, это ноутбук Омегона, разумеется. Ну как вам?
Мастера простых решений
DevAlt 23.08.2026
В сишарп стэках winforms, да и wpf существует сложная система связывания источниках данных и элементов формы(текстовые поля и метки), опирается все это на технологию событий и мета. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru