1. запустите программу несколько раз. объясните, почему при некото-рых запусках треугольники рисуются поверх текста в верхнем левомуглу экрана. измените программу так, чтобы треугольники рисовалисьниже текста (правее текста).2. добавьте в программу возможность ввода длины второго катета. 3. измените
программу так, чтобы длины катетов задавались случай-ным образомuses graphabc; var n, x, y, a : integer; procedure pr_treug (x, y, a,b : integer); var x_c, y_c: integer; begin line(x, y, x + a,y); line(x, y, x, y + b); line(x + a, y, x, y + b); x_c : = x + 2; y_c : = y + 2;
floodfill(x_c,y_c,clrandom); end; begin writeln('ввeдите количество'); read(n); writeln (n); writeln('ввeдите длину катета'); read(a); writeln (a); for var i: = 1 to n do begin x: = random(500); y: = random(400); pr_treug(x, y, a, a); end; end.
Рассмотрим каждую комбинацию отдельно:
HDEE
2 условие - true
3 условие - true
4 условие - true
Подходит
HHAE
2 условие - true
3 условие - false(H на 2 месте)
HEAE
2 условие - true
3 условие - true
4 условие - true
Подходит
AHAH
2 условие - true
3 условие - true
4 условие - true
Подходит
AEAD
2 условие - true
3 условие - true
4 условие - true
Подходит
AEED
2 условие - false(E на 3 месте)
CAEH
2 условие - false(A не входит в список допустимых значений)
EHAD
2 условие - true
3 условие - false(E не входит в список допустимых значений)
CDEA
2 условие - true
3 условие - true
4 условие - false(A не входит в список допустимых значений)
ответ: 4
Для данной сортировки используем алгоритм сортировки слиянием
В начале разбиваем арбузы на 2 группы по 2Каждую группу взвешиваем и сортируем (т.е. всего 2 взвешивания)Теперь собираем вместе, сравниваем сначала более легкие арбузы и находим самый легкий (всего 3 взвешивания)Теперь сравниваем тяжелый арбуз, что в группе с самым легким и более легкий из другой группы, и определяем второй по легкости (всего 4 взвешивания)Потом взвешиваем оставшиеся арбузы и докладываем их по порядку (всего 5 взвешивания)