Файлы прямого доступа. Найти сумму компонент, стоящих между минимальной и максимальной

@sane4ek · Регистрация: 11.05.2012

Author24 — интернет-сервис помощи студентам

Задан числовой файл F. Найти сумму компонент, стоящих между минимальной и максимальной. Записать в файл H сначала минимум, затем максимум, затем сумму. Файл H распечатать.

@3a9Ic · 11.05.2012, 15:23

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
Uses CRT;
Const n=10;
var a:array[1..n] of integer;
    i,min,max,s,index,undex:integer;
    F,H:text;
begin
     ClrScr;
assign(F,'chisla.txt');
Rewrite(f);
     for i:=1 to n do
     begin
          a[i]:=Random(11);
          write(F,a[i],' ');
     end;
Close(f);
min:=a[1];
max:=a[1];
     for i:=1 to n do
      begin
           if a[i]< min then
           begin
                min:=a[i];
                index:=i;
           end;
           if a[i]> max then
           begin
                max:=a[i];
                undex:=i;
           end;
      end;
if undex=0 then inc(undex);
if index=0 then inc(index);
      {writeln('Ìax=',max,' ','Index=',undex);
      writeln('Min=',min,' ','Index=',index);}
s:=0;
     if undex>index then
     for i:=index+1 to undex-1 do s:=s+a[i];
     if index>undex then
     for i:=undex+1 to index-1 do s:=s+a[i];
assign(H,'OTBET.txt');
Rewrite(h);
begin
     writeln(h,'Min=',min);
     writeln(h,'Max=',max);
     writeln(h,'Summa=',s);
end;
Close(h);
writeln('File H:');
writeln('Min=',min);
writeln('Max=',max);
writeln('Summa=',s);
end.

Новые блоги и статьи Все статьи Все блоги /
Циклы for в Python py-thonny 17.03.2025 Существует множество ситуаций, когда нам нужно выполнить одно и то же действие несколько раз. Цикл for в Python — настоящий рабочий конь для большинства программистов. Если вам нужно пройтись по всем. . .	Предсказание ветвлений - путь к высокопроизводительному C++ NullReferenced 17.03.2025 В высокопроизводительном программировании на C++ каждый такт процессора на счету. Когда речь заходит о разработке систем с низкой задержкой — будь то высокочастотная торговля, обработка потоковых. . .	Паттерн CQRS в C# UnmanagedCoder 17.03.2025 Создание сложных корпоративных приложений часто требует нестандартных подходов к архитектуре. Один из таких подходов — паттерн CQRS (Command Query Responsibility Segregation), предлагающий простую,. . .	Паттерн Цепочка ответственности в C# UnmanagedCoder 17.03.2025 Цепочка ответственности — это поведенческий паттерн проектирования, который позволяет передавать запросы последовательно по цепочке потенциальных обработчиков, пока один из них не обработает запрос. . . .	Создаем микросервисы с NestJS, TCP и Typescript run.dev 17.03.2025 NestJS — фреймворк, который значительно упрощает создание серверных приложений на Node. js. Его прелесть в том, что он комбинирует концепции ООП, функционального программирования и предлагает. . .
Гексагональная архитектура со Spring Boot Javaican 17.03.2025 Если вы когда-нибудь сталкивались с ситуацией, когда внесение простых изменений в базу данных или пользовательский интерфейс заставляло вас переписывать весь код, то вы точно оцените элегантность. . .	Позиционирование Kafka Consumer и Seek-операции Javaican 17.03.2025 Что же такое Consumer Seek в Kafka? По сути, это API-метод, который позволяет программно указать, с какой позиции (offset) Consumer должен начать или продолжить чтение данных из партиции. Без этого. . .	Python NumPy: Лучшие практики и примеры py-thonny 17.03.2025 NumPy (Numerical Python) — одна из ключевых библиотек для научных вычислений в Python. Она превращает Python из просто удобного языка общего назначения в среду для проведения сложных математических. . .	Java Micronaut в Docker: контейнеризация с Maven и Jib Javaican 16.03.2025 Когда речь заходит о микросервисной архитектуре на Java, фреймворк Micronaut выделяется среди конкурентов. Он создан с учётом особенностей облачных сред и контейнеров, что делает его идеальным. . .	Управление зависимостями в Java: Сравнение Spring, Guice и Dagger 2 Javaican 16.03.2025 Инъекция зависимостей (Dependency Injection, DI) — один из фундаментальных паттернов проектирования, который радикально меняет подход к созданию гибких и тестируемых Java-приложений. Суть этого. . .

@sane4ek 1 / 1 / 1 Регистрация: 11.05.2012 Сообщений: 3
		1
	Файлы прямого доступа. Найти сумму компонент, стоящих между минимальной и максимальной 11.05.2012, 11:05. Показов 1383. Ответов 1 Метки нет (Все метки) Задан числовой файл F. Найти сумму компонент, стоящих между минимальной и максимальной. Записать в файл H сначала минимум, затем максимум, затем сумму. Файл H распечатать. 0

Опции темы

Файлы прямого доступа. Найти сумму компонент, стоящих между минимальной и максимальной

Решение