1 дерево вершина + ветка + ствол
2 дерево вершина + две ветки
3 дерево ветка + ствол
Сначала наполняем трели первый бидон, переливаем масло из него в пятилитровый. Там теперь 3 л. Еще раз наполняем трехлитровый бидон и заполняем до конца пятилитровый. Теперь в трехлитровом бидоне 1 л и в пятилитровом 5. Возвращаем масло из пятилитрового бидона в восьмилитровый, а из трехлитрового выливаем в пятилитровый 1 л масла. Снова наполняем трехлитровый и выливаем в пятилитровый. Теперь в пятилитровом бидоне 4 л масла и в восьмилитровом так же.
<em>// PascalABC.NET 3.3, сборка 1625 от 17.01.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function amax(a:array of integer):integer;
begin
Result:=a.Max
end;
begin
var x:=ArrRandom(ReadInteger('n='),-50,50); x.Println;
Writeln('Максимальный элемент равен ',amax(x))
end.
<u>Пример</u>
n= 15
-21 9 27 -46 -17 -21 22 50 -50 -47 -20 43 -23 43 -46
Максимальный элемент равен 50
Назвать дерево именем??/Ну пусть Анатолий будет! =)
Дан АВСД-прямоуг. АВ=А; ВС=А-В
1)ВС=20-5=15
S=AB*BC=20*15=300
P=2AB+2BC=2*20+2*15=40+30=70
2) BC=12-3=9
S=12*9=108
P=2*12+2*9=24+18=42