Рассматриваются множество целых чисел, принадлежащих числовому отрезку \([2077;8276]\), которые делятся на 6 и не делятся на 4, 9, 20, 36.
Найдите количество таких чисел и максимальное из них.
Для выполнения этого задания можно написать программу или воспользоваться редактором электронных таблиц.
Программа перебирает все числа от 2077 до 8276 включительно и проверяет их на кратность. Одновременно она находит максимальное число, создавая переменную maxim и присваивая ей минимальное значение 0. Если программу удовлетворяют условия, то переменной maxim присваивается новое значение, большее её самой, а также обновляется счетчик интересуемых её чисел.
\[\begin{array}{ | l | l | l |} \hline Python & C++ & Pascal \\ \hline count=0 & \#include\; <iostream> & var\; i,maxim,count:integer; \\ m=0 & using\; namespace\; std; & begin \\ for\; i\; in\; range(2077,8277): & & \quad maxim:=0; \\ \quad if\; (i\%6==0): & int\; main()\{ & \quad count:=0; \\ \quad\quad if(i\%4!=0): & \quad int\; i,maxim,count; & \quad for\; i:=2077\; to\; 8276\; do \\ \quad\quad\quad if(i\%9!=0): & \quad count=0; & \quad begin \\ \quad\quad\quad\quad if(i\%20!=0): & \quad maxim=0; & \quad if\; i\; mod\; 6\; =\; 0\; then \\ \quad\quad\quad\quad\quad if(i\%36!=0): & \quad for(i=2077);i<8277;i++)\{ & \quad\quad if\; i\; mod\; 4\; <>\; 0\; then \\ \quad\quad\quad\quad\quad\quad if(i>m): & \quad\quad if(i\%6==0)\{ & \quad\quad\quad if\; i\; mod\; 9\; <>\; 0\; then \\ \quad\quad\quad\quad\quad\quad\quad m=i & \quad\quad\quad if(x\%4!=0)\{ & \quad\quad\quad\quad if\; i\; mod\; 20\; <>\; 0\; then \\ \quad\quad\quad\quad\quad\quad\quad count+=1 & \quad\quad\quad\quad if(x\%9!=0)\{ & \quad\quad\quad\quad\quad if\; i\; mod\; 36\; <>\; 0\; then \\ print(count,m) & \quad\quad\quad\quad\quad if(x\%20!=0)\{ & \quad\quad\quad\quad\quad\quad if\; i\; >\; maxim\; then \\ & \quad\quad\quad\quad\quad\quad if(x\%36!=0)\{ & \quad\quad\quad\quad\quad\quad maxim\; :=\; i; \\ & \quad\quad\quad\quad\quad\quad\quad if(i>maxim)\{ & \quad\quad\quad\quad\quad\quad count\; :=\; count\; +\; 1; \\ & \quad\quad\quad\quad\quad\quad\quad\quad maxim=i; & writeln(count;maxim) \\ & \quad\quad\quad\quad\quad\quad\quad\quad count+=1; & \\ & cout<<count<maxim; & \\ & \} & \\ \hline \end{array}\]
Ответ: 345 8274