Program z1;
var s,p,a,b,c:real;
begin
write('Введите катеты: ');
read(a,b);
c:=sqrt(sqr(a)+sqr(b)); // гипотенуза по т.Пифагора
writeln('Гипотенуза = ',c);
p:=a+b+c;// периметр
writeln('Периметр = ',p);
s:=a*b; // площадь
writeln('Площадь = ',s);
<span>end.
Жду спасибо)</span>
Ответ:
Х = 1
Объяснение:
Составим уравнение приводя числа в 10 СС
Х * 16^2 + В * 16^1 + 9 * 16^0 + 6 * 8^2 + 5 * 8^1 + Х * 8^0 = 866
Х * 256 + 11 * 16 + 9 * 1 + 6 * 64 + 5 * 8 + Х * 1 = 866
256Х + 176 + 9 + 384 + 40 + Х = 866
256Х + Х = 866 - 176 - 9 - 384 - 40
257Х = 257
Х = 257 / 257
Х = 1
Проверим
1В9 (16) = 1 * 16^2 + В * 16^1 + 9 * 16^0 = 1 * 256 + 11 * 16 + 9 * 1 = 256 + 176 + 9 = 441
651 (8) = 6 * 8^2 + 5 * 8^1 + 1 * 8^0 = 6 * 64 + 5 * 8 + 1 * 1 = 384 + 40 + 1 = 425
441 + 425 = 866
Нужно что-то присвоить функции для случая, когда (2*a+b-c)<0
Например, так:
function sqrt1 (a, b, c: real): real;
begin
if (2 * a + b - c) < 0 then
<span>begin writeln (' complex number '); sqrt1:=-1; end</span>
else sqrt1:= sqrt(2 * a + b - c);
<span>end;</span>
На Гром-камне, служащем пьедесталом Медному всаднику, написано: "Petro Primo Catharina Secunda, MDCCLXXXII" (Петру Первому Екатерина Вторая, 1782).
Соответственно, ответ — секунда.
Ответ:
Название переменных и их зависимость друг от друга