Процессор
<span>сетевая карта
</span>оперативная память
<span>материнская плата
</span>видеокарта
<span>блок питания
</span><span>накопитель (дисковод)
</span><span>ПЗУ</span>
16000 Герц * 8 бит * 2 канала * 10 сек = 2560000 бит
2560000 бит / 8 =320000 байт
320000 байт / 1024 = 312,5 Кбайт
Var
i, sum: longint;
begin
for i := 1 to 100 do sum := sum + sqr(i);
write(sum);
end.
//Pascal ABC.NET v3.1 сборка 1219
Var
n,k1,k2,i:integer;
r:real;
begin
readln(n);
for i:=1 to n do
begin
readln(r);
if r>0 then k1:=k1+1;
if r<0 then k2:=k2+1;
end;
writeln('Положительные:',k1);
writeln('Отрицательные:',k2);
end.
Пример ввода:
4
-1.1
2
3
0
Пример вывода:
Положительные:2
Отрицательные:1
<span>38 ∙ 60 = 2280 байт информационный объем одной
страницы, 1.44 = 1509949,44 байт, 1509949,44 : 2280 = 662,26, следовательно поместится на дискете 662 страницы</span>