Var a,b,c,p: Real;
begin
writeln('Введите a,b,c,p');
readln(a,b,c,p);
writeln('S=',sqrt(p*(p-a)*(p-b)*(p-c)));
end.
Чтобы передавать информацию разного рода между удаленными устройствами связи
1. 8 бит
2. В гигАбайте 8589934592 бит
3. В гигАбайте 1073741824 байт
1) 32 это 2 в пятой степени ответ 5
2) 4*5=20 бит 5*6=30 бит ответ второе