Укажите наименьшее число яблок, которое нужно одновременно взять из ящика(не заглядывая в него), чтобы среди них были хотя бы 2 яблока одного сорта, если в ящике находятся яблоки: 1) двух сортов 2) трёх сортов 3)четырёх сортов 4)nсортов

1) 3 яблока;

2) 4 яблока;

3) 5 яблок;

4) n+1 яблок.

объяснение: если доставать яблок столько же, сколько и сортов, то они могут быть все разных сортов.

если же доствать яблок на одно больше, чем количество сортов, и даже если все кроме последнего разных сортов, то последнее обязательно будет одного и того же сорта с каким-нибудь из остальных.

import math

p = int(

b = false

for i in range(1, p ** 2):

    gip = (p ** 2) + (i ** 2)

    if math.sqrt(gip) % 1 == 0:

        b = true

        if int(math.sqrt(gip)) ! = p:

            print(int(math.sqrt(

if b == false:

    print(-1)

# что-то типо этого, но не проходит по времени. надо смотреть диапазон. может если кто дорешает, ответьте. а так всё норм работает)

var

  a, b, s, c, alpha, betta, gamma, h, p: real;

  x, ar, br, gr: real; {alpha, beta. gamma в радианах}

begin

  write('введите длины двух сторон треугольника и площадь: ');

  readln(a, b, s);

  x : = 2 * s / (a * b);

  if x > 1 then writeln('такой треугольник невозможен')

  else

  begin

    gr : = arcsin(x);

    c : = sqrt(sqr(a) + sqr(b) - 2 * a * b * cos(gr));

    p : = a + b + c;

    ar : = arcsin(a * sin(gr) / c);

    br : = pi - (ar + gr);

    h : = b * sin(ar);

    alpha : = ar * 180 / pi;

    betta : = br * 180 / pi;

    gamma : = 180 - (alpha + betta);

    writeln('решение треугольника');

    writeln('a=', a, ', b=', b, ', c=', c: 0: 5);

    writeln('alpha=', alpha: 0: 2, ', betta=', betta: 0: 2, ', gamma=', gamma: 0: 2);

    writeln('p=', p: 0: 5, ', h=', h: 0: 5, ', s=', s)

  end

end.

тестовое решение:

введите длины двух сторон треугольника и площадь: 3 4 6

решение треугольника

a=3, b=4, c=5.00000

alpha=36.87, betta=53.13, gamma=90.00

p=12.00000, h=2.40000, s=6