Склавиатуры вводятся целые числа a, b и c. если а*b больше, чем с2-b, тогда выведите а+b, в противном случае выведите b+c.

Впростонародье - разложить число на множители. для этого тебе нужно перебирать все простые числа, и смотреть, делится ли это число на них. причём, на каждое из них нужно делить несколько раз до победного конца. простые числа есть смысл брать только до n/2-1, где n - само число. таблицу простых числел можно составить заранее (я не думаю, что предусматривать работу с двадцатизначными числами, поэтому хватит числе в пределах 2 миллиардов) . вот только поиск простых чисел подразумевает решение этой же самой .

Рядок 11

Объяснение:

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

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

Анализируем:

9 строка: три различных значения, двух одинаковых или очень близких по величине значений нет. Не подходит.

10 строка: два одинаковых значения - 15, и третье 17, но 17 > 15, в таком случае на диаграмме был бы один большой сектор и два сектора поменьше. Не подходит.

11 строка: 56 и 57 - близкие по величине, 11 значительно меньше двух других значений в столбце. Подходит

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

Var       best, m, s,i: integer; begin       best : = 10000000;       for i: = 1 to 3 do begin               write('min sec = ');               readln(m, s);               if best > m * 60 + s then best : = m * 60 + s;       end;             writeln('лучший = ', best div 60, ' min ', best mod 60, ' sec'); end.