В классе 175 ребят. Спортом занимаются – 69,
программированием - 100, танцами - 73.Одновременно
спортом и программированием – 30, программированием и
танцами - 55, танцами и спортом – 27. Ничем не занимаются - Х.
Во всех трех секциях занимаются - 22
СРОЧНО ПОЖАЛУЙСТА!!!!!
программированием - 100, танцами - 73.Одновременно
спортом и программированием – 30, программированием и
танцами - 55, танцами и спортом – 27. Ничем не занимаются - Х.
Во всех трех секциях занимаются - 22
СРОЧНО ПОЖАЛУЙСТА!!!!!
Answers & Comments
Ответ:
Var a: array[1..100000] of integer; i,max,n: integer; begin readln(n); for i: = 1 to n do read(a[i]); max: =a[1]+a[n]; for i: = 2 to n div 2 do if max < a[i] + a[n-i] then max: = a[i] + a[n-i]; writeln(max); end.
Объяснение:
ВРОДЕ ТАК