Обозначим за n%m операцию, возвращающую остаток от целочисленного деления n на m. известно, что сумма - id729519420230318 от Yuiyuii 18.03.2023 14:54

Question

Информатика: Обозначим за n%m операцию, возвращающую остаток от целочисленного деления n на m. известно, что сумма всех целых положительных чисел a, для которых следующее логическое высказывание истинно: не (a 2 или a 18 или a%x 0) или не (a 4 или a 20 или a%4 0) равна 87. найдите такое значение x, при котором это возможно. в ответе укажите целое число.

Yuiyuii · Accepted Answer

1.var s,s1,s2:string;i,a,sum:integer;beginreadln(s);s1:= ;s2:= * ;sum:=0;for i:=1 to length(s) doif pos(s1,s) mod 2=1 then beginsum:=sum+1;insert(s2,s,pos(s1,s));delete(s,pos(s1,s),1);end;writeln(sum);writeln(s);end.var  s, s1, s2: string;  i, a, sum: integer; begin  readln(s);  s1 := ;  s2 := * ;  sum := 0;  for i := 1 to length(s) do    if pos(s1, s) mod 2 = 1 then     begin      sum := sum + 1;      insert(s2, s, pos(s1, s));      delete(s, pos(s1, s), 1);    end;  writeln(sum);  writeln(s);end....

MOGZ ответил