要在PLC中编程实现一个灯亮5秒后灭5秒的循环，你可以使用以下方法：
使用定时器
定义两个定时器变量，一个用于计时亮灯时间，另一个用于计时灭灯时间。
初始化这两个定时器，设置它们的时间为5秒。
在主程序中，使用一个循环来控制灯的状态。在循环中，根据定时器的状态来控制灯的亮灭。
```pascal
VAR
StartTimer: TON; // 定时器变量，用于计时亮灯时间
StopTimer: TON; // 定时器变量，用于计时灭灯时间
StartTime: BOOL := FALSE; // 记录是否达到亮灯时间
StopTime: BOOL := FALSE; // 记录是否达到灭灯时间
END_VAR
// 初始化定时器
StartTimer(IN:=NOT StartTime, PT:=T5S);
StopTimer(IN:=NOT StopTime, PT:=T5S);
// 设置输出
Q1.0 := StartTime AND NOT StopTime; // 亮灯信号
Q1.1 := StopTime AND NOT StartTime; // 灭灯信号
// 计时处理
IF NOT StartTime THEN
StartTimer(IN:=NOT StartTime, PT:=T5S);
END_IF;
IF NOT StopTime THEN
StopTimer(IN:=StartTime, PT:=T5S);
END_IF;
// 更新状态
StartTime := StartTimer.Q; // 记录是否达到亮灯时间
StopTime := StopTimer.Q; // 记录是否达到灭灯时间
```
使用循环和计数器
定义一个计数器变量，用于记录循环次数。
在主程序中，使用一个循环来控制灯的状态。在循环中，根据计数器的值来控制灯的亮灭。
```pascal
VAR
Counter: INT := 0; // 计数器变量，用于记录循环次数
LampStatus: BOOL := FALSE; // 灯的状态变量，初始为关闭
END_VAR
// 主程序循环
WHILE TRUE DO
IF Counter MOD 2 = 0 THEN
// 偶数次循环，亮灯
LampStatus := NOT LampStatus;
ELSE
// 奇数次循环，灭灯
LampStatus := NOT LampStatus;
END_IF;
// 控制输出信号，控制灯的开关状态
IF LampStatus THEN
Q1.0 := TRUE; // 开启灯
ELSE
Q1.0 := FALSE; // 关闭灯
END_IF;
// 更新计数器
Counter := Counter + 1;
// 延时一段时间，等待下一个循环周期
DELAY;
END_WHILE
```
这两种方法都可以实现灯亮5秒后灭5秒的循环。你可以根据具体的PLC型号和编程环境选择合适的方法。