Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 09.03.2017 18:15
- Информатика
- remove_red_eye 7098
- thumb_up 29
Ответы и объяснения 1
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger('>',ReadInteger('N='));
Writeln('Общий размер файлов, байт- ',a.Sum);
Writeln('Средний размер файла, Кбайт- ',a.Average/1024:0:2);
Writeln('Максимальный рзмер имеет файл №',a.IndexMax+1)
end.
Пример
N= 6
> 1300 830 263 1900 172 1500
Общий размер файлов, байт- 5965
Средний размер файла, Кбайт- 0.97
Максимальный рзмер имеет файл №4
- 01.01.1970 00:00
- thumb_up 16
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.