С++:
int n;
cin >> n;
int sum = 0;
int* mas = new int[n];//создание массива
for(int i = 0; i < n; i++){//ввод массива
cin >> mas[i];
}
for(int i = 0; i < n; i++){//ввод массива
if(mas[i] > 0){
sum++;
}
}
if(sum != 5){
cout << "NO";
}
else{
cout << "Yes";
}
<em>// PascalABC.NET 3.2, сборка 1407 от 18.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=Range(1,10);
Writeln(s.Aggregate(1,(p,q)->p*q));
Writeln('S=',s.Where(k->k.IsEven).Sum,', П=',
s.Where(k->k.IsOdd).Aggregate(1,(p,q)->p*q));
Writeln('S2=',s.Select(k->k*k).Sum)
end.
<u>Результат</u>
3628800
S=30, П=945
S2=385
1)Первый жесткий диск это продукт, который разработала компания IBM в 1956 году, и вошел он в историю как начало компьютерной индустрии.
2)8,4 ГБ,128 ГБ
3)При операциях — чтения (read)
HDD медленее в 94 раза (0.68 МБ/с против 63.6 МБ/с), по сравнению с SSD
HDD медленее в 53 раза (0.36 МБ/с против 19 МБ/с), по сравнению с SSD
При операциях — записи (write)
HDD медленее в 178 раз (0.78 МБ/с против 139 МБ/с), по сравнению с SSD
HDD медленее в 86 раз (0.64 МБ/с против 55 МБ/с), по сравнению с SSD
4)В 1981 году стоимость 1 ГБ пространства на HDD составляла 500 000 долларов. Сейчас — 0,025 доллара.
5)Является основным накопителем данных в большинстве компьютеров.
Var
a:array[1..8] of integer;
b:array[1..8] of integer;
i:integer;
begin
write('Заполните массив - ');
for i:=1 to 8 do
read(a[i]);
for i:=1 to 8
do
begin
if a[i]<(-5) then b[i]:=a[i]*3
else
begin
if a[i]>7 then b[i]:=a[i]*5
else b[i]:=a[i];
end;
end;
for i:=1 to 8 do
write(a[i],' ');
writeln();
for i:=1 to 8 do
write(b[i],' ');
<span>end.</span>