program xxx;
var i, j, k, n, p, s : integer;
a : array [1..20] of integer;
begin
write ('введите количество инверсий -');
readln(k);
write ('введите количество ламп -');
readln(n);
for i:=1 to n do
a[i]:=0;
for i:=1 to k do
begin
write ('введите инверсию P-');
readln(p);
j:=p;
while j<=n do
begin
if a[j]=0 then a[j]:=1 else a[j]:=0;
j:=j+p
end
end;
s:=0;
for i:=1 to n do
if a[i]=1 then s:=s+1;
write ('Ламп горит -', s);
readln
end.
# coding: utf-8
# Python 3.X
n = str(int(input('Число: ')))
print(n[3] + n[1:3] + n[0])
2.
# coding: utf-8
# Python 3.X
n = str(int(input('Число: ')))
print(n[0] + n[2:4])
3.
# coding: utf-8
# Python 3.X
n = str(int(input('Число: ')))
print(n[1:3])