3 / 3 / 0
Регистрация: 24.04.2010
Сообщений: 39

Организовать файл целых чисел из N компонентов.

17.06.2010, 01:52. Показов 1204. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Организовать файл целых чисел из N компонентов. Найти сумму максимального и минимального элементов этого файла.
Помогите плиз.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
17.06.2010, 01:52
Ответы с готовыми решениями:

Дан файл из целых чисел. Поменять порядок компонентов в файле на обратный.
Дан файл из целых чисел. Поменять порядок компонентов в файле на обратный. (указ.:ввод и вывод файлов оформить в программе в виде...

Дан файл из целых чисел. Поменять порядок компонентов в файле на обратный
1) Дан файл из целых чисел. Поменять порядок компонентов в файле на обратный. 2) Заменить в файле строки, совпадающие с 1ой строкой...

Сформировать файл из модулей целых чисел, найти среднее арифметическое значение компонентов с четными номерами
Сформировать файл из модулей целых чисел, найти среднее арифметическое значение компонентов счетными номерами. Помогите!! Срочно!! ...

2
63 / 64 / 13
Регистрация: 08.06.2008
Сообщений: 243
17.06.2010, 07:22
Вот на Delphi, на Pascal сам переведешь, не сложно это:
Delphi
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
program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;
var
  f:file of integer;
  max,min:integer;
  number:integer;
  i,n:integer;
begin
  randomize;
  max:=-1000;
  min:=1000;
  assignfile(f,'c:\integer.bin');
  rewrite(f);
  writeln('input n');
  readln(n);
  for i:=1 to n do
    begin
      number:=random(1000)-500;
      write(f,number);
      if number>max then
        max:=number;
      if number<min then
        min:=number;
    end;
  closefile(f);
  writeln('sum max+min = ',max+min);
  readln;
end.
1
Почетный модератор
 Аватар для Puporev
64312 / 47609 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
17.06.2010, 07:35
Лучший ответ Сообщение было отмечено 4eri как решение

Решение

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
uses crt;
var f:file of integer;
    a,mn,mx,i:integer;
begin
clrscr;
assign(f,'file');
rewrite(f);
writeln('Введите в файл не менее двух чисел, окончание ноль');
i:=0;
repeat
readln(a);
write(f,a);
i:=i+1;
until(a=0)and(i>=2);
close(f);
clrscr;
reset(f);
writeln('Содержание файла:');
read(f,mn);
write(mn,' ');
mx:=mn;
while not eof(f) do
 begin
  read(f,a);
  write(a,' ');
  if a<mn then mn:=a;
  if a>mx then mx:=a;
 end;
close(f);
writeln;
writeln('Минимум=',mn,' максимум=',mx);
writeln('Их сумма=',mn+mx);
readln
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
17.06.2010, 07:35
Помогаю со студенческими работами здесь

Организовать файл вещественных чисел из N компонентов
Организовать файл вещественных чисел из N компонентов.Заменить все позитивные компоненты файла их квадратными корнями,а все негативные...

Организовать файл целых чисел из N компонент.
Есть задача: Организовать файл целых чисел из N компонент. Определить и вывести на экран максимальное число в файле. Но в ней есть...

Обработка файлов. Сформировать файл целых чисел, кол-во компонентов которого = 2n
Постановка задачи: Сформировать типизированный файл, тип, кол-во и взаимное расположение компонентов которого отвечают условию задания. ...

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

Организовать типизированный файл целых чисел F1, состоящий из N компонент
Привет, Киберфорум, помоги мне с задачкой пожалуйста. Организовать типизированный файл целых чисел F1, состоящий из N компонент....


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

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

Новые блоги и статьи
Как писать чистый, тестируемый и качественный код на Python
py-thonny 12.07.2025
Помню свой первый проект на Python. Работал тогда быстро, грязно, лишь бы работало. Код был похож на запутанный клубок - переменные по одной букве, функции на 200 строк, комментарии отсутствовали как. . .
Blazor и контроллер сервопривода IoT Meadow Maple
Wired 11.07.2025
Я решил разобраться, как можно соединить современные веб-технологии с миром "железа". Интересная комбинация получилась из Blazor в качестве веб-интерфейса и микроконтроллера Meadow с его веб-сервером. . .
Генерация OpenQASM из кода Q#
EggHead 10.07.2025
Летом 2024-го я начал эксперименты с библиотекой Q# Bridge, и знаете что? Она оказалась просто находкой для тех, кто работает на стыке разных квантовых экосистем. Основная фишка этой библиотеки -. . .
Изучаем новый шаблон ИИ-чата .NET AI Chat Web App
stackOverflow 10.07.2025
В . NET появилось интересное обновление - новый шаблон ИИ-чата под названием . NET AI Chat Web App. Когда я впервые наткнулся на анонс этого шаблона, то сразу понял, что Microsoft наконец-то. . .
Результаты исследования от команды ARP (июль 2025 г.)
Programma_Boinc 10.07.2025
Результаты исследования от команды ARP (июль 2025 г. ) Африканский проект по дождям (ARP) World Community Grid снова запущен! Мы рады поделиться обновленной информацией о нашем прогрессе с осени. . .
Angular vs Svelte - что лучше?
Reangularity 09.07.2025
Сегодня рынок разделился на несколько четких категорий: тяжеловесы корпоративного уровня (Angular), гибкие универсалы (React), прогрессивные решения (Vue) и новая волна компилируемых фреймворков. . .
Code First и Database First в Entity Framework
UnmanagedCoder 09.07.2025
Entity Framework дает нам свободу выбора, предлагая как Code First, так и Database First подходы. Но эта свобода порождает вечный вопрос — какой подход выбрать? Entity Framework — это. . .
Как использовать Bluetooth-модуль HC-05 с Arduino
Wired 08.07.2025
Bluetooth - это технология, созданная чтобы заменить кабельные соединения. Обычно ее используют для связи небольших устройств: мобильных телефонов, ноутбуков, наушников и т. д. Работает она на частоте. . .
Руководство по структурам данных Python
AI_Generated 08.07.2025
Я отчетливо помню свои первые серьезные проекты на Python - я писал код, он работал, заказчики были относительно довольны. Но однажды мой наставник, взглянув на мою реализацию поиска по огромному. . .
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах
Programma_Boinc 08.07.2025
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах Опубликовано: 07. 07. 2025 Рубрика: Uncategorized Автор: AlexA Статья размещается на сайте с разрешения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru