Всего можно получить 4 начертания) полужирный, курсив, полужирный курсив, обычный шрифт
Var n,i,s,c:integer;
begin
readln(n);
for i:=1 to n do //сколько произвольных чисел будет.
begin
readln(c); //вводим произвольные числа
s:=s+c; //суммируем
end;
writeln(s); //Вывод суммы
<span>end.</span>
begin
var ss := ReadSeqInteger(ReadlnInteger('n ='));
ss.Count(x -> (x > 0) and (x mod 5 = 0)).Println;
end.
Текстовые: leto.doc dog.txt cat.jpg music.txt otvet.txt
Графические: aaa.bpm mama.jpg cat.jpg game.bpm
Программы: boy.exe box.exe
Ответ:
27.3 %, 72.7%
Объяснение:
1. Найдем объем, занятый файлами
1.12 Гб + 1.05 Гб + 17 Мб = 2.17 + 17 / 1024 Гб ≈ 2.1866 Гб
2. Найдем, какую часть в процентах составляет занятый объем от полного
2.1866×100/8 ≈ 27.3 %
3. Заполненная часть составит 100 - 27.3 = 72.7%