Ваган Шутова332
?>

Сэтим. выпишите в порядке возрастания величины, 1кбайт, 1мбайт, 1001 байт, 8бит, 1 гбайт

Информатика

Ответы

kitoova

ответ

объяснение: 8бит 1001кбаит 1 мбаит 1гбаит

tarasovs

#include < math.h>

#include < cstdlib> #include < iostream>

 

using namespace std;

 

 

 

int main()

{

  float x1,x2,x3,y1,y2,y3;

  cout< < "введите кординаты первой точки"< < endl;

  cin> > x1;

  cin> > y1;

  cout< < "введите кординаты второй точки"< < endl;

  cin> > x2;

  cin> > y2;

  cout< < "введите кординаты третьей точки"< < endl;

  cin> > x3;

  cin> > y3;

  float ax=x1-x2,ay=y1-y2,bx=x2-x3,by=y2-y3,cx=x3-x1,cy=y3-y1;

  float a=sqrt(ax*ax+ay*ay);

  float b=sqrt(bx*bx+by*by);

  float c=sqrt(cx*cx+cy*cy);

  float s,p,p;

  p=a+b+c;

  p=p/2;

  s=sqrt(p*(p-a)*(p-b)*(p-c));

  cout< < "площадь равна "< < s< < " периметр равен "< < p< < endl;

  system("pause");

  return 0 ;

}

format-l3364

var a: array [byte,byte] of real; i,j,n,m: byte; s: real; d,p: word;

beginwrite('введите количество строк n = '); readln(n); write('введите количество строк m = '); readln(m); for i: =1 to n do for j: =1 to m do readln(a[i,j]);

s: =0; d: =0; p: =0; for i: =1 to m do beginfor j: =1 to n do s: =s+a[j,i]; for j: =1 to n doif a[j,i]< (s/n) then inc(d); writeln('количество элементов в столбце ',i,' прямоугольной вещественной матрицы, меньших среднего арифметического d = ',d,' среднее арифметическое = ',(s/n): 0: 4); p: =p+d; d: =0; s: =0; end; writeln('общее количество элементов меньших элементов в столбцах = ',p); writeln('матрица'); for i: =1 to n do beginfor j: =1 to m do write(a[i,j],' '); writeln; end; end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Сэтим. выпишите в порядке возрастания величины, 1кбайт, 1мбайт, 1001 байт, 8бит, 1 гбайт
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Алексеевич949
Alekseevna1064
Белов_Лукина1339
Александрович Андреевна
hellomaxim
Klicheva_Ermachenkova1536
byfetvostochniy
Pona4ka93
kseniay2006548
Mark-Petrovich
gorushko-tabak3
Pautova1119
Yurevich1344
Lukina
papushinrv4985