Можно на калькуляторе программистическом, Умножаешь на два единицу если у тебя в двоичном единица добавляешь один к произведению если ноль то умножаешь
Ответ:
#include <iostream>
#include <conio.h>
#include <math.h>
using namespace std;
//---------------------------------------------------------------------------
int main(int argc, char* argv[])
{
float x1,x2,x3,y1,y2,y3;
float S,P;
float st1,st2,st3,p;
cout<<"koordinata 1: "; cin>>x1>>y1;
cout<<"koordinata 2: "; cin>>x2>>y2;
cout<<"koordinata 3: "; cin>>x3>>y3;
st1=sqrt(((x2-x1)*(x2-x1))+((y2-y1)*(y2-y1)));
st2=sqrt(((x2-x3)*(x2-x3))+((y2-y3)*(y2-y3)));
st3=sqrt(((x3-x1)*(x3-x1))+((y3-y1)*(y3-y1)));
P=st1+st2+st3;
p=P/2;
S=sqrt(p*(p-st1)*(p-st2)*(p-st3));
cout<<"Perimetr= "<<P<<endl<<"Ploshad'= "<<S;
_getch();
return 0;
}
Объяснение:
Ввод и вывод только поменяй с С++ на СИ
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function IsPrime(n:integer):boolean;
begin
if n<4 then Result:=True
else begin
var found:=(n mod 2=0);
var p:=3;
while (not found) and (sqr(p)<=n) do
begin found:=(n mod p=0); p+=2 end;
Result:=not found
end
end;
begin
var a:=ArrRandom(ReadInteger('n='),0,100); a.Println;
var primes:=a.Where(x->IsPrime(x)).ToArray;
primes.Sort;
primes.Println
end.
<u>Пример</u>
n= 17
33 23 56 58 32 2 5 72 68 59 89 30 17 40 44 21 23
2 5 17 23 23 59 89
Sum := 0;
z := 0;
for i := 1 to 4 do
for j := 1 to 2 do
if A[i,j] > 0 then
begin
sum := sum + A[i,j]
inc(z)
end;
SrArif := sum/z;
Формула нахождения объема закодированного звука
A = D * i * t * c (D - частота дискретизации, i - глубина бит/разрядность, t - время, c - кол-во каналов)
Приводим единицы измерения
D = 64.0 Гц (возможно тут описка, обычно 64 кГц)
t = 320 c
A = D * i * t * c = 64.0 * 64 * 320 * 1 = 1310720.0 бит = 160.0 Kбайт = 0.15625 Мбайт
