| s = 0 n = 0 FOR i = 1 TO 11 IF A(i) MOD i = 0 THEN s = s + A(n) ELSE A(n) = A(n) + A(i) END IF NEXT i | s = 0 n = 0 for i in range(1, 12): if A[i] % i == 0: s += A[n] else: A[n] += A[i] |
| Алгоритмический язык | Паскаль |
| s := 0 n := 0 нц для i от 1 до 11 если mod(A[i], i) = 0 то s := s + A[n] иначе A[n]:= A[n] + A[i] все кц | s := 0; n := 0; for i := 1 to 11 do if A[i] mod i = 0 then s := s + A[n] else A[n] := A[n] + A[i]; |
| С ++ | |
| s = 0; n = 0; for (int i = 1; i < 12; i++) { if (A[i] % i == 0) s += A[n]; else A[n] += A[i]; } | |