Var
i, j: longint;
b: boolean;
begin
b := true;
for i := 1000 to 9999 do
begin
for j := 2 to i - 1 do
begin
if(i mod j = 0) then
begin
b := false;
break;
end;
end;
if(b = true) then writeln(i);
b := true;
end;
end.
Program z1;var N,A,B,C,D:integer;beginreadln(N);A:=N div 1000;B:=(N div 100) - (N div 1000)*10;C:=(N div 10)- (N div 100)*10;D:=(N mod 10);n:=0;if (A mod 3)=0 then N:=N+A;if (B mod 3)=0 then N:=N+B;if (C mod 3)=0 then N:=N+C;if (D mod 3)=0 then N:=N+D;writeln(N); end.
Import random
def solver():
while True:
key = random.randint(1,1000)
n = input('Введите начало множества: ')
m = input('Введите конец множества: ')
if m <= n or m<= 0 or n <= 0:
return False
if key in range(n,m):
print('YES')
print('число в диапазоне %i - %i' %(n,m))
else:
print('NO')
solver()
Для каждого, кроме 26. X, до числа 26 будет меньше 26 и 27 и не больше 25. С 27 X будет больше 25, но не меньше 26 и 27. А при 26=X, выполняются оба логических выражения связанных логическим элементом "ИЛИ".