Есть ответ 👍

Вводится последовательность целых чисел (2 или больше числа), меньших 1000 по модулю, 1001 конец последовательности. Определить максимальную сумму коэффициентов уравнения x² + bx + c = 0 корнями, которого являются 2 числа из последовательности. (С учётом кратности, т. е. если число в последовательность входит один раз, то кратность корня один).

126
353
Посмотреть ответы 1

Ответы на вопрос:


Var       a,b,c,d : integer;   begin         for a: =1 to 4 do         for b: =a+1 to 4 do                 for c: =b+1 to 4 do             for d: =c+1 to 4 do                   writeln(a: 3,b: 3,c: 3,d: 3);       for a: =1 to 4 do         for b: =a+1 to 4 do            for c: =b+1 to 4 do              writeln(a: 3,b: 3,c: 3);       for a: =1 to 4 do         for b: =a+1 to 4 do            writeln(a: 3,b: 3);       for a: =1 to 4 do         writeln(a: 3);         readln;     end.

Популярно: Информатика