1.
program asd;
uses crt;
var
a: array[1..10] of integer;
i:integer;
sum:integer;
begin
writeln('Введите 10 цифр по очереди');
for i:=1 to 10 do
begin
readln(a[i]);
if (a[i]>7) then begin a[i]:=7; sum:=sum+1; end;
end;
writeln(' ',sum);
end.
2. смысл задания? 10/2=5 или индексами ты имела ввиду значениями?
3.
program asd;
uses crt;
var
a: array[1..10] of integer;
i:integer;
naib:integer;
begin
writeln('Введите 10 цифр по очереди');
for i:=1 to 10 do
begin
readln(a[i]);
if (a[i]>naib) then naib:=a[i];
end;
writeln(' ',naib);
end.
35 документов
Объяснение:
Из запроса "Классификация || Кластеризация" мы получили общую сумму документов со словом "Классификация" = 100 + документы со словом "Кластеризация" = 200, итого 300 документов. Из этого можем сделать вывод, что ни в одном документе не встречаются сразу оба слова "классификация" и "кластеризация".
Следовательно, в нашем искомом запросе часть "Классификация & Кластеризация" обращается в ноль.
А что касается части "Классификация & Регрессия?
Из запроса "Регрессия & (Классификация || Кластеризация) видим, что есть 50 документов, удовлетворяющих условию, где есть как документы с Кластеризацией, так и с Классификацией. Но из них 15 документов, в которых встречаются слова Кластеризация и Регрессия вместе. Такие документы нам не подходят, отнимем их от 50 и получим 35.