Расположите величины в порядке убывания: 1024 бита, 1000байтов, 1 бит, 1 байт, 1 кбайт

1кбайт, 1000 байтов,1024 бита, 1 байт, 1 бит

1кбайт  1000 байт 1024 бит  1 байт 1 бит

// pascalabc.net 3.2, сборка 1370 от 24.12.2016 // внимание! если программа не работает, обновите версию! begin   var a: =arrrandomreal(readinteger('n=',99); a.println;   var x,y: real;   write('введите границы интервала для произведения: ');   read(x,y);   var p: =a.where(q-> (q> =x) and (q< =(1.0,(x,y)-> x*y);   writeln('p=',p) end. пример n= 10 11.0202379617934 -21.4386138983251 17.4840150235612 -92.4701039881772 8.05400941383746 -23.9996788990682 85.7269244402307 -27.4690603960627 -72.6577002609417 61.1870779274903 введите границы интервала для произведения: -20 30.8 p=1551.83047486587

#include < iostream> #include < vector> using namespace std; int main() { cout < < "введите вектор (0, чтобы закончить): \n"; float in; vector< float> a; while (true) { cin > > in; if (in == 0) break; else a.insert(a. in); } float p, x, y; cout < < "x = "; cin > > x; cout < < "y = "; cin > > y; p = 1; for (int i = 0; i < a.size(); i++) { if ( (a[i] > = x) & & (a[i] < = y) ) p *= a[i]; } cout < < "p = " < < p < < '\n' < < "a[]: "; for (int i = 0; i < a.size(); i++) { cout < < a[i] < < ' '; } return 0; }