=целое (-6,985)+макс (15;16;17)

10

Объяснение:

целое (-6,985) округляет до ближайшего меньшего целого, или говоря по другому, вычисляет ближайшее целое число на оси слева от данного, то есть в данном случае результатом будет -7;

макс (15;16;17) вычисляет максимальное число из набора данных чисел, то есть результатом данной функции будет число 17

=целое (-6,985)+макс (15;16;17) = -7 + 17 = 10

var

i,n: integer;

a: array [1..100] of integer;

begin

readln(n);

for i: =1 to n do

begin

if i mod 2 =0 then a[i]: =i-3

else a[i]: =i+3;

writeln(a[i]);

end;

end.

1) 35-25=10 (чел.) - не являются читателями школьной библиотеки

2) 35-20=15 (чел.) - не являются читателями районной библиотеки

3) (25+20)-35=10 (чел.) - читатели обеих библиотек

4) 20-10=10 (чел.) - читатели только районной библиотеки

5) 25-10=15 (чел.) - читатели только школьной библиотеки