<em>// PascalABC.NET 3.2, сборка 1362 от 14.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadArrInteger('>',ReadInteger('N='));
Writeln('Общий размер файлов, байт- ',a.Sum);
Writeln('Средний размер файла, Кбайт- ',a.Average/1024:0:2);
Writeln('Максимальный рзмер имеет файл №',a.IndexMax+1)
end.
<u>Пример</u>
N= 6
> 1300 830 263 1900 172 1500
Общий размер файлов, байт- 5965
Средний размер файла, Кбайт- 0.97
Максимальный рзмер имеет файл №4
10+18=28
округляем в 32, это пятая степень двойки
5 умножить на 7 рано 35 делим на 8, округляем в большую сторону : 5
5 умножаем на 60: 300 байт
Ответ:
10
Объяснение:
От А по А 1 столбец
От 1 по 10 количество строк: (10-1)+1=10
количество столбец * количество строк = 1*10 =10