Группа школьников отправилась отмечать последний звонок. пятнадцать учеников пошли гулять по городу. смотреть кино пошли семнадцать человек. гуляли по городу, смотрели кино и вечером общались в чате группы пятеро. гуляли по городу, общались в чате группы, но не смотрели кино шестеро школьников. сколько школьников было в группе, если известно, что в чате вечером собралось одиннадцать человек, а среди тех, кто и гулял по городу, и смотрел кино, нет тех, кто не вышел в чат?

Ответ: 27

Лучше сразу говорить какой язык проходите, а то вдруг общественность догадается неправильно. если вдруг паскаль, то я бы попробовал написать так: ==== первая программа  ====  program pr1 ; var i , n  : integer ; var s : real ; begin n : = 0 ;                           { количество найденных чётных чисел  } s : = 1 ;                           { получившееся произведение  }     for i : = 15 to 30 do       if i mod 2 = 0 then begin           n : = n + 1 ;           s : = s * i ;             end ; writeln ('kolicestvo chetnyh  chisel=' , n , '   proizvedenie=' , s  ) ; end. (если я правильно догадался, что добуток значит произведение. произведение такого кол-ва чисел будет слишком большим для разрядности целого числа, поэтому придётся использовать вещественное, а результат из-за этого  получится приближённым).  ====== вторая ======= program pr2 ; var i : integer ; var k : real ; begin   k = 0 ;   for i : = 6 downto 1 do             k : = k + cos ( 1. / i ) ;   writeln ('k=' , k: 10: 8 ) ;   end. (странный ряд. чаще   по-другому, типа 1/cos(x), ну что есть - то есть. тогда всё ок).