Маша и медведь отправились на прогулку, взяв с собой много пирожков. через некоторое время они вышли на просеку, вдоль которой стояло 2020 пеньков. поскольку маша и мишка устали, то решили перекусывать на каждом пеньке. но потом маша решила, что каждый третий пенек ей не нравится, на нем они сидеть не будут, а мишка решил, что каждый пятый пенек ему не нравится и на нем они точно сидеть не будут. они не отдыхают на пеньке, если кому-то он не нравится. определите, на каком количестве пеньков они отдыхали?

begin

var sum :integer := 2020;

var i :integer := 0;

var counter : integer :=0;

while (i <> sum) do

begin

if (i mod 3 <> 0) and (i mod 5 <> 0) then

counter += 1;

i+=1;

end;

writeln (counter);

end.

//ответ 1077

Массив вводится с клавиатуры через пробел 15 элементов
var
a:array[1..15]of integer;
i,j,buf:integer;
begin
    for i:=1 to 15 do
        read(a[i]);
     for i:=1 to 14 do
         for j:=i+1 to 15 do
                if (a[i]<>0)and(a[j]<>0) then
                   if a[i]>a[j]then
                      begin
                             buf:=a[i];
                             a[i]:=a[j];
                             a[j]:=buf;
                      end;
writeln;
   for i:=1 to 15 do
       write(a[i]:4);
end.

35 документов

Объяснение:

Из запроса "Классификация || Кластеризация" мы получили общую сумму документов со словом "Классификация" = 100 + документы со словом "Кластеризация" = 200, итого 300 документов. Из этого можем сделать вывод, что ни в одном документе не встречаются сразу оба слова "классификация" и "кластеризация".

Следовательно, в нашем искомом запросе часть "Классификация & Кластеризация" обращается в ноль.

А что касается части "Классификация & Регрессия?

Из запроса "Регрессия & (Классификация || Кластеризация) видим, что есть 50 документов, удовлетворяющих условию, где есть как документы с Кластеризацией, так и с Классификацией. Но из них 15 документов, в которых встречаются слова Кластеризация и Регрессия вместе. Такие документы нам не подходят, отнимем их от 50 и получим 35.