Program Num1;
var a, b, c , s, p, rb, ro :real;
begin
writeln ('Введите стороны треугольника через пробел');
read (a,b,c);
p:= (a+b+c)/2;
s:= sqrt(p*(p-a)*(p-b)*(p-c));
rb:= s/p;
ro:= (a*b*c)/(4*s);
writeln ('RB = ',rb:0:2,' RO = ',ro:0:2);
end.
2)В конце программы будет написано:
данные
1418324196
результат:a=14,k=18
S= 200*200
S= 400 2 (два это в квадрате)
1 байт=256 точкам (правильно говорить пикселям)
400/256= 1 байт и 48 бит
Три варианта, выбирайте, что вам больше по нраву
1*2^1+0*2^0+12^-1+0*2^-2
6*8^1+4*8^0+5*8^-1