Выполните расшифровку конфигураций устройств 1 вариант
1. Расшифровать конфигурацию видеокарты:
Видеокарта AGP 256МБ Zotac «GeForce 6200 ZT-62AA250-HSS» (GeForce 6200, 64бит DDR2, D-Sub, DVI, TV) (ret)
2. Расшифровать конфигурацию корпуса:
Aerocool «XPredator Black Edition», ATX, черный (без БП)
3. Расшифровать конфигурацию винчестера:
Жесткий диск 1000ГБ 2.5» Western Digital «Scorpio Blue WD10TPVT», 5200об/мин., 8МБ (SATA II) (oem)
4. Расшифровать конфигурацию материнской платы:
Socket1155 GIGABYTE «GA-H67A-USB3-B3» (iH67, 4xDDR3, SATA III, SATA II, RAID, 2xPCI-E, D-Sub, DVI, HDMI, SB, 1Гбит LAN, USB2.0, USB3.0, ATX) (ret)
5. Расшифровать конфигурацию модуля памяти:
1ГБ DDR2 SDRAM Kingston «ValueRAM» KVR800D2N6/1G (PC6400, 800МГц, CL6) (ret)
6. Расшифровать конфигурацию процессора:
AMD «Phenom II X2 555 Black Edition» (3.20ГГц, 2x512КБ+6МБ, HT2000МГц) SocketAM3 (Box) (ret)
var a:array[1..n] of integer;
i,s:integer; sr:real;
begin
Randomize;
writeln('Массив:');
for i:=1 to n do
begin
a[i]:=random(21);
write(a[i]:3);
end;
writeln;
s:=0;
for i:=1 to n do s:=s+a[i];
sr:=s/n;
writeln('Среднее арифметическое = ',sr:6:2);
writeln('Номера элементов, больших среднего арифметического:');
for i:=1 to n do
if a[i]>sr then write(i:3);
writeln;
end.
Пример:
Массив:
9 19 14 8 7 10 5 10 6 14 15 2 11 17 13
Среднее арифметическое = 10.67
Номера элементов, больших среднего арифметического:
2 3 10 11 13 14 15