Алфавит СС - все коэффициенты данной СС.
3х=120
х=40
за 40 секунд 1 Мбайт
4 за 160 секунд
или 2 мин 40 секунд
Var a,i:integer;
begin
a:=0;
for i = 10 to 99 do
begin
if ((i mod 2)<>0) and ((i mod 13)<>0) then
a:=a+1;
end;
writeln (a);
end.
вроде так
1. =СУММЕСЛИ(C1:C1001;"студент";D1:D1001)/СЧЁТЕСЛИ(C1:C1001;"студент")
2. в ячейку F2 поставить формулу =ЕСЛИ(ABS(E2-D2)<5;1) скопировать вниз до 1001
в ячейку G3 поставить =сумм(F2:F1001) это ответ