На диаграмме три сектора, значит диапазон должен содержать 3 значения. По таблице видно, что в столбцах 4 значения, а в строках - 3, значит столбцы не подходят, а искать нужно в строках.
На диаграмме 2 больших, почти одинаковых сектора и 1 значительно меньший, значит среди строк нужно искать такую, в которой 2 близких или одинаковых значения, а третье значение меньше двух других.
Анализируем:
9 строка: три различных значения, двух одинаковых или очень близких по величине значений нет. Не подходит.
10 строка: два одинаковых значения - 15, и третье 17, но 17 > 15, в таком случае на диаграмме был бы один большой сектор и два сектора поменьше. Не подходит.
11 строка: 56 и 57 - близкие по величине, 11 значительно меньше двух других значений в столбце. Подходит
12 строка. Все три значения разные, нет такого значения, которое бы было существенно меньше двух других. Не подходит.
Const maxn=15; var a: array[1..maxn] of integer; skv,prod,gr,i: integer; begin writeln('введите ',maxn,' чисел'); skv:=0; prod:=1; gr:=0; for i:=1 to maxn do begin write(i,': '); readln(a[i]); if a[i]<0 then skv:=skv+a[i]*a[i]; if (a[i] mod 2 = 0) and (i mod 2 = 0) then prod:=prod*a[i]; if abs(a[i])>100 then gr:=gr+1; end; writeln('сумма квадратов отрицательных: ',skv); writeln('произведение четных на четных местах: ',prod); writeln('больше 100 по модулю: ',gr); end.
введите 15 чисел 1: 151 2: -231 3: 104 4: 19 5: 36 6: -112 7: 5 8: 8 9: 11 10: 13 11: 45 12: 5 13: 6 14: 17 15: 19 сумма квадратов отрицательных: 65905 произведение четных на четных местах: -896 больше 100 по модулю: 4
Рядок 11
Объяснение:
На диаграмме три сектора, значит диапазон должен содержать 3 значения. По таблице видно, что в столбцах 4 значения, а в строках - 3, значит столбцы не подходят, а искать нужно в строках.
На диаграмме 2 больших, почти одинаковых сектора и 1 значительно меньший, значит среди строк нужно искать такую, в которой 2 близких или одинаковых значения, а третье значение меньше двух других.
Анализируем:
9 строка: три различных значения, двух одинаковых или очень близких по величине значений нет. Не подходит.
10 строка: два одинаковых значения - 15, и третье 17, но 17 > 15, в таком случае на диаграмме был бы один большой сектор и два сектора поменьше. Не подходит.
11 строка: 56 и 57 - близкие по величине, 11 значительно меньше двух других значений в столбце. Подходит
12 строка. Все три значения разные, нет такого значения, которое бы было существенно меньше двух других. Не подходит.
var a: array[1..maxn] of integer;
skv,prod,gr,i: integer;
begin
writeln('введите ',maxn,' чисел');
skv:=0; prod:=1;
gr:=0;
for i:=1 to maxn do
begin
write(i,': '); readln(a[i]);
if a[i]<0 then skv:=skv+a[i]*a[i];
if (a[i] mod 2 = 0) and (i mod 2 = 0) then
prod:=prod*a[i];
if abs(a[i])>100 then gr:=gr+1;
end;
writeln('сумма квадратов отрицательных: ',skv);
writeln('произведение четных на четных местах: ',prod);
writeln('больше 100 по модулю: ',gr);
end.
введите 15 чисел
1: 151
2: -231
3: 104
4: 19
5: 36
6: -112
7: 5
8: 8
9: 11
10: 13
11: 45
12: 5
13: 6
14: 17
15: 19
сумма квадратов отрицательных: 65905
произведение четных на четных местах: -896
больше 100 по модулю: 4