Аватар для m1lk
0 / 0 / 0
Регистрация: 27.02.2012
Сообщений: 28

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

02.03.2012, 12:24. Показов 1460. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Даны массивы h1,..,h7 -шифры цехов; l1,..,l7-лимит электро энергии,кВт.ч ;r1,..,r7-израсходованная электроэнергия ,кВт.ч ; напечатать список цехов ,у которых экономия электроэнергии составила более 5%.указать цех у которого экономия в процентах максимальна .
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
02.03.2012, 12:24
Ответы с готовыми решениями:

Напечатать список цехов ,у которых экономия электроэнергии составила более 5%.(массивы)
Даны массивы h1,..,h7 -шифры цехов; l1,..,l7-лимит электро энергии,кВт.ч ;r1,..,r7-израсходованная электроэнергия ,кВт.ч ; напечатать...

Напечатать список заводов, у которых экономия электроэнергии составила более 5%
Даны массивы: PR1.....PR9 - наименования заводов; L1.....L9 - лимит электроэнергии, кВт.ч; R1.....R9 - израсходованная...

Напечать список заводов, у которых экономия электроинергии составила более 5%
Даны массивы: PR1,..PR9 - наименования заводов; L1,..,L9 - лимит электроинергии кВт/ч; R1,..,R9 - израсходованная электроинергия...

2
1 / 1 / 0
Регистрация: 25.01.2012
Сообщений: 30
05.03.2012, 12:23
up Такаяже задача
0
любитель покушать
 Аватар для Севак
687 / 641 / 248
Регистрация: 25.09.2011
Сообщений: 1,313
05.03.2012, 13:25
Лучший ответ Сообщение было отмечено m1lk как решение

Решение

m1lk,
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
uses crt;
var
h: array[1..5] of string;
l,r: array[1..5] of integer;
e: array[1..5] of real;
i,k: integer;
max: real;
begin
max:=0;
for i:=1 to 5 do begin
write(i ,' цех');
writeln;
write('Введите шифр : ');
read(h[i]);
repeat
write('Введите лимит электроэнергии: ');
read(l[i]);
write('Введите кол-во израсходованной электроэнергии: ');
read(r[i]);
until l[i]>=r[i];
e[i]:=((l[i]-r[i])/l[i])*100;
if e[i]>max then max:=e[i];
k:=i;
end;
writeln('Шифры цехов, экономия электроэнергии в которых больше 5%: ');
for i:=1 to 5 do begin
if e[i]>5 then
write(h[i],' ');
end;
writeln;
write('Экономия электроэнергии максимальна в цехе c шифром ',h[k],' и составляет ',max:1:1,'%!');
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
05.03.2012, 13:25
Помогаю со студенческими работами здесь

Вывести список заводов, у которых экономия электроэнергии составила более 5%. Найти завод с наибольшим процентом экономии электроэнергии.
Решите пожалуйста через внешний файл. Даны массивы PR1, ... , PR9 - наименования заводов; L1, ... , L9 - лимит электроэнергии,...

Напечатать списки цехов, в которых соотношение рабочих и инженерно-технических работников более 1,5 и менее 2
Нужно сделать с помощью(используя) записей. Даны шифры десяти цехов, численности рабочих и инженерно-технических работников в каждом....

Массив: Вывести список цехов, в которых величина заработной платы на одного рабочего более ZR руб.
Пожалуйста помогите решить!!! Задание 6 Дан массив t1, ... , t20. Заменить отрицательные ti на . Задание 7 Даны массивы ...

Вывести список цехов, в которых величина заработной платы на одного рабочего более ZR руб. при премиальном фон
Даны массивы ZEX1, ... , ZEX8 - шифры цехов автотранспортного предприятия; K1, ... , K8 - количества рабочих в каждом цехе; F1, ... ,...

Вывести списки цехов, в которых соотношение рабочих и ИТР более 1,5 и менее 2-х
Даны цифры 10-и цехов, численность рабочих и инженерно-технических работников в каждом.Вывести списки цехов ,в которых соотношение рабочих...


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

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

Новые блоги и статьи
POCO, ACE, Loki и другие продвинутые C++ библиотеки
NullReferenced 13.05.2025
В C++ разработки существует такое обилие библиотек, что порой кажется, будто ты заблудился в дремучем лесу. И среди этого многообразия POCO (Portable Components) – как маяк для тех, кто ищет. . .
Паттерны проектирования GoF на C#
UnmanagedCoder 13.05.2025
Вы наверняка сталкивались с ситуациями, когда код разрастается до неприличных размеров, а его поддержка становится настоящим испытанием. Именно в такие моменты на помощь приходят паттерны Gang of. . .
Создаем CLI приложение на Python с Prompt Toolkit
py-thonny 13.05.2025
Современные командные интерфейсы давно перестали быть черно-белыми текстовыми программами, которые многие помнят по старым операционным системам. CLI сегодня – это мощные, интуитивные и даже. . .
Конвейеры ETL с Apache Airflow и Python
AI_Generated 13.05.2025
ETL-конвейеры – это набор процессов, отвечающих за извлечение данных из различных источников (Extract), их преобразование в нужный формат (Transform) и загрузку в целевое хранилище (Load). . . .
Выполнение асинхронных задач в Python с asyncio
py-thonny 12.05.2025
Современный мир программирования похож на оживлённый мегаполис – тысячи процессов одновременно требуют внимания, ресурсов и времени. В этих джунглях операций возникают ситуации, когда программа. . .
Работа с gRPC сервисами на C#
UnmanagedCoder 12.05.2025
gRPC (Google Remote Procedure Call) — открытый высокопроизводительный RPC-фреймворк, изначально разработанный компанией Google. Он отличается от традиционых REST-сервисов как минимум тем, что. . .
CQRS (Command Query Responsibility Segregation) на Java
Javaican 12.05.2025
CQRS — Command Query Responsibility Segregation, или разделение ответственности команд и запросов. Суть этого архитектурного паттерна проста: операции чтения данных (запросы) отделяются от операций. . .
Шаблоны и приёмы реализации DDD на C#
stackOverflow 12.05.2025
Когда я впервые погрузился в мир Domain-Driven Design, мне показалось, что это очередная модная методология, которая скоро канет в лету. Однако годы практики убедили меня в обратном. DDD — не просто. . .
Исследование рантаймов контейнеров Docker, containerd и rkt
Mr. Docker 11.05.2025
Когда мы говорим о контейнерных рантаймах, мы обсуждаем программные компоненты, отвечающие за исполнение контейнеризованных приложений. Это тот слой, который берет образ контейнера и превращает его в. . .
Micronaut и GraalVM - будущее микросервисов на Java?
Javaican 11.05.2025
Облачные вычисления безжалостно обнажили ахиллесову пяту Java — прожорливость к ресурсам и медлительный старт приложений. Традиционные фреймворки, годами радовавшие корпоративных разработчиков своей. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru