Var x, y: real;
begin
readln(x, y);
if ((x > 0) and (y > 0)) then writeln('true') else writeln('false');
<span>end.
В первой четверти X и </span><span>Y положительны)</span>
#include <iostream>
using namespace std;
void z(int *m, int n, int a, int b)
{
srand(time(NULL));
for(int i=0;i< n;i++) m[i]=a+rand()%(b-a+1);
}
int k(int *m, int n, int a, int b)
{
int s=0;
for(int i=0;i< n;i++) s+=m[i]>=a && m[i]<=b;
return s;
}
int main()
{
int n,a,b,na,nb;
cout<<" Vvedite razmer massiva n: "; cin>>n;
int *m=new int[n];
cout<<"Vvedite diapazon ot a do b: "; cin>>a>>b;
z(m,n,a,b);
for(int i=0;i< n;i++) cout << m[i] << " ";
cout<< endl;
cout<<"number_A number_B: ";
cin>>na>>nb;
cout<<"k="<< k(m,n,na,nb);
delete []m;
cout<<"\nPress Enter for exit\n";
cin.get();
cin.get();
}
Пример:
<span> Vvedite razmer massiva n: 10
Vvedite diapazon ot a do b: 10 50
15 16 31 21 36 34 23 39 31 11
number_A number_B: 20 30
k=2
Press Enter for exit</span>
Размер стереозаписи (без сжатия) измеряется по формуле:
A = 2*D*T*i,
Размер цифрового моноаудиофайла измеряется по формуле:
A = D*T*i,
где D – частота дискретизации (Гц), T – время звучания или записи звука, i - разрядность регистра (разрешение).
A1 = 2*D*T*i = 50 Мбайт ⇒ D*T*i = 50/2 = 25 МбайтA2 = (D/5)*T*(3*i) = 3/5 * D*T*i = 3/5 * 25 = 15 Мбайт
Ответ: 15 Мбайт
=СЧЁТЕСЛИ(A1:A3;"<1000")+СЧЁТЕСЛИ(A1:A3;">30000")
Вместо A1:A3 задавайте нужный диапазон.