1

2

3

4

5

6

7

8

9

10

11

12

13

14

入っている数字：2 3 5 7 11 13 

スタート

正解です

判定中です

やり直す

素数を分けよう\
制限時間以内に素数を四角の中に入れましょう。\
（注）円を動かすときは円の中心から操作してください。\
\ \ \ \ \ \ \ \ \ 円が重なっているときもあるので気を付けてください。

Nowtime: {80, 4, 33, 17, 27, 1, 2019, "January", "Sunday", 1}
L6 = Sequence(i, i, ceil(y(Corner[1, 1]) + 1), floor(y(Corner[1, 3])) - 1)
L5 = Sequence(i, i, ceil(x(Corner[1, 1])) + 1, floor(x(Corner[1, 3])) - 1)
Firsttime: {424, 43, 32, 17, 27, 1, 2019, "January", "Sunday", 1}
Diff: ((Element[Nowtime, 4] - Element[Firsttime, 4]) * 3600) + ((Element[Nowtime, 3] - Element[Firsttime, 3]) * 60) + Element[Nowtime, 2] - Element[Firsttime, 2]
time: 20
A = (-2, 2.5)
B = (-2, -2)
poly1, f, g, h, i, C, D = Polygon(A, B, 4)
r = 0.42 (slider from 0 to 1, step 0.01)
stage: 0
Remain: time - Diff
text15: "残り時間：\ " + (LaTeX[Remain]) + "秒"
AL: {false, true, true, false, true, false, true, false, false, false, true, false, true, false}
animation = 2.4 (slider from -5 to 5, step 0.1)
GoToNext = true
R = (3.226273588473492, 1.2230461967836836)
E = (-3.74231115147612, 2.555416594105552)
S: E + (-0.21996707244803826, 0.5499176811200966) / 2
F = (1.7980492057327877, -0.5119109392973102)
T: F + (-0.3849423767840672, 0.5499176811200965) / 2
G = (0.9353633369632345, -1.0007662649333913)
U: G + (-0.3849423767840672, 0.5499176811200965) / 2
H = (3.887666087863483, 0.49455590760050394)
V: H + (-0.38494237678406706, 0.5499176811200966) / 2
I = (-0.9817163714135502, -0.8282290911794804)
W: I + (-0.38494237678406706, 0.5499176811200965) / 2
J = (4.453204601834634, -1.2691574241061419)
Z: J + (-0.3849423767840672, 0.5499176811200966) / 2
K = (1, 1)
A_1: K + (-0.38494237678406673, 0.5499176811200965) / 2
L = (4.769522753716804, 1.4722665588726662)
B_1: L + (-0.38494237678406673, 0.5499176811200966) / 2
M = (-3.866921332520611, 1.2134607982417998)
C_1: M + (-0.38494237678406673, 0.5499176811200966) / 2
N = (3.6959581170258042, -2.975358364561484)
D_1: N + (-0.5590829758054308, 0.5499176811200966) / 2
O = (-1.1159119509999251, 0.5808244944774594)
E_1: O + (-0.5590829758054308, 0.5499176811200965) / 2
P = (2.143123553240609, -3.7326048493703152)
F_1: P + (-0.5590829758054308, 0.5499176811200966) / 2
Q = (-0.23405528514660415, 1.6927307253359969)
G_1: Q + (-0.5590829758054308, 0.5499176811200966) / 2
H_1: R + (-0.5590829758054312, 0.5499176811200965) / 2
PointList: {E, F, G, H, I, J, K, L, M, N, O, P, Q, R}
IsIn = Sequence(IsInRegion[Element[PointList, i], poly1], i, 1, 14)
State: AL - IsIn
l1 = Sequence((x - x(Element[PointList, i]))^(2) + (y - y(Element[PointList, i]))^(2) ≤ r^(2), i, 1, 14, 1)

Tool: Tool1
Input: A
Output: h, g

B: (x(A), 0)
C: (0, y(A))
g = Segment(A, C)
h = Segment(A, B)