Var
k, x, z: real;
begin
readln(x);
readln(z);
if x > z then
k := sqrt(2 * (x - z) / z);
if x <= z then
k := x + z;
println(k);
end.
Ответ:
ABCE=8
Объяснение:
ACDE=25
ACE=18
ABCDE=15
ABCE=8
Остальные пути не проходят через C
Логика такая:
1) Число 157 - это суммы 15 и 7 в порядке убывания, т.к. 1 и 57 не подойдут в виду условий задачи.
2) Пусть наименьшее число abc, тогда желательно b+c = 15, а a+b = 7.
Подберем: чтобы цифра b в нашем числе было наименьшей, цифра c должна взять на себя наибольшее значение -> 9. Тогда b = 6.
Итого: a69.
a будет 1, т.к. 1+6 = 7.
Таким числом является 169.
Проверим: 1+6 = 7. 6+9 = 15. В порядке убывания получается 157.
var
i,p:integer;
begin
p:=1;
for i:=7 to 12 do
p:=p*i;
writeln(p);
end.