0 / 0 / 0
Регистрация: 10.08.2010
Сообщений: 16

Составить программу занесения в динамическую память вещественного массива

02.09.2010, 19:31. Показов 3142. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Составить программу занесения в динамическую память вещественного массива из 10000 чисел хранящихся в файле на магнитном диске, а также поиска в нём значения и номера первого максимального элемента.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
02.09.2010, 19:31
Ответы с готовыми решениями:

Составить программу, которая содержит динамическую переменную
Добрый вечер!Помогите пожалуйста составить программу,которая содержит динамическую переменную.

Составить программу возведения вещественного числа в степень с натуральным показателем
помогите кто нить в решении мега сложных задач: 1)каждое число равно сумме 2х предыдущих чисел, то есть1,1,2,3,5,8...и тд составить...

Занесение в динамическую память вещественного массива.
составить программу занесения в динамическую память вещественного массива из 10 000 чисел из интервала от -300 до 200, а так же поиска в...

1
Почетный модератор
 Аватар для Puporev
64307 / 47604 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
02.09.2010, 20:11
Лучший ответ Сообщение было отмечено Silverain14 как решение

Решение

Цитата Сообщение от Silverain14 Посмотреть сообщение
из 10000 чисел
Сейчас все кинутся делать этот файл для тестирования программы...

Добавлено через 25 минут
С 10000 не проверял, проверил на 80 числах.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
uses crt;
type mas=array[0..0] of real;
var f:text;
    a:^mas;
    n,i,imx:integer;
    mx:real;
    nf:string;
begin
clrscr;
write('Имя файла для чтения: ');
readln(nf);
nf:=nf+'.txt';
assign(f,nf);
{$I-} reset(f);  {$I+}
if IOResult <> 0 then
 begin
  writeLn('Файл ',nf,' не найден!');
  writeLn('Работа программы завершена. Нажмите ENTER');
  readln;
  exit;
 end;
new(a);
n:=10000;
for i:=0 to n-1 do
read(f,a^[i]);
close(f);
mx:=a^[0];imx:=1;
for i:=0 to n-1 do
if a^[i]>mx then
 begin
  mx:=a^[i];
  imx:=i;
 end;
write('Максимум=',mx:0:2,'  его индекс=',imx);
dispose(a);
readln
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
02.09.2010, 20:11
Помогаю со студенческими работами здесь

Составить программу вычисления, используя процедуру возведения вещественного числа в целую степень
Составить программу вычисления, используя процедуру возведения вещественного числа в целую степень. Procedure Step (n: integer; x:...

Составить программу, которая содержит динамическую информацию о наличии автобусов в автобусном парке
Составить программу, которая содержит динамическую информацию о наличии автобусов в автобусном парке. Сведения о каждом автобусе содержат: ...

Составить программу, которая содержит динамическую информацию о наличии автобусов в автобусном парке.
Составить программу, которая содержит динамическую информацию о наличии автобусов в автобусном парке. Сведения о каждом автобусе...

Написать программу, применяя динамическую память, создающую массив на 100000 элементов
Нужно написать программу, применяя динамическую память, создающую массив на 100000 элементов

Составить программу, которая находит сумму элементов вещественного массива, расположенных правее последнего
Составить программу, которая находит сумму элементов вещественного массива, расположенных правее последнего отрицательного элемента...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

Новые блоги и статьи
Образование и практика
Igor3D 21.03.2025
Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .
Lazarus. Таблица с объединением ячеек.
Massaraksh7 21.03.2025
Понадобилась представление на экране таблицы с объединёнными ячейками. И не одной, а штук триста, и все разные. На Delphi я использовал для этих целей TStringGrid, и то, кривовато получалось. А в. . .
Async/await в Swift: Асинхронное программировани­е в iOS
mobDevWorks 20.03.2025
Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .
Колмогоровская сложность: Приёмы упрощения кода
ArchitectMsa 20.03.2025
Наверное, каждый программист хотя бы раз сталкивался с кодом, который напоминает запутанный лабиринт — чем дальше в него погружаешься, тем сложнее найти выход. И когда мы говорим о сложности кода, мы. . .
PostgreSQL в Kubernetes: Подготовка кластера и настройка
Mr. Docker 20.03.2025
Когда доходит до контейнеризации баз данных и особенно таких требовательных к ресурсам системах как PostgreSQL, многие команды до сих пор колеблются, прежде чем перенести их в контейнерную. . .
C++26: Индексирование пакетов и метапрограммиро­вание
bytestream 20.03.2025
Эволюция C++ продолжается стремительными темпами – каждый новый стандарт приносит функциональность, о которой мы мечтали годами. Звучит слишком громко? Если вы когда-либо боролись с вариадическими. . .
Состояние гонки в C#: подводные камни многопоточного программировани­я
UnmanagedCoder 20.03.2025
Что такое состояние гонки? Это ситуация, когда результат программы непредсказуемо меняется в зависимости от порядка выполнения потоков. Проще говоря, два или более потока пытаются одновременно. . .
Next.js для разработки React: преимущества серверного рендеринга
Reangularity 20.03.2025
Next. js решает классическую проблему React-приложений: медленную первоначальную загрузку и плохую индексацию поисковиками. Вместо того чтобы заставлять браузер пользователя выполнять всю работу по. . .
JUnit или TestNG: Выбираем Java-фреймворк для тестирования
Javaican 20.03.2025
История тестовых фреймворков в Java началась в конце 90-х, когда Кент Бек и Эрих Гамма разработали JUnit - инструмент, который перевернул представление разработчиков о модульном тестировании. JUnit. . .
Разбиваем монолит на два микросервиса и реализуем CI/CD
ArchitectMsa 20.03.2025
Когда команда растет, а функциональность монолита расширяется, поддерживать и развивать такую систему становится все труднее. Разработчики начинают тратить много времени на разбор сложных. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru