Для этого можно написать следующий код на языке программирования Pascal:
program NonPrimeNumbers; var m, n, i, j: integer; isPrime: boolean; begin write('Enter m: '); readln(m); write('Enter n: '); readln(n); writeln('Non-prime numbers between ', m, ' and ', n, ':'); for i := m to n do begin isPrime := true; for j := 2 to trunc(sqrt(i)) do begin if i mod j = 0 then begin isPrime := false; break; end; end; if not isPrime then write(i, ' '); end; end.
Этот код запрашивает у пользователя два числа - m и n, затем выводит на экран все числа от m до n, которые не являются простыми. Он проверяет каждое число на простоту, делая это с помощью циклов и операции нахождения остатка от деления (%).
Для этого можно написать следующий код на языке программирования Pascal:
program NonPrimeNumbers;var
m, n, i, j: integer;
isPrime: boolean;
begin
write('Enter m: ');
readln(m);
write('Enter n: ');
readln(n);
writeln('Non-prime numbers between ', m, ' and ', n, ':');
for i := m to n do
begin
isPrime := true;
for j := 2 to trunc(sqrt(i)) do
begin
if i mod j = 0 then
begin
isPrime := false;
break;
end;
end;
if not isPrime then
write(i, ' ');
end;
end.
Этот код запрашивает у пользователя два числа - m и n, затем выводит на экран все числа от m до n, которые не являются простыми. Он проверяет каждое число на простоту, делая это с помощью циклов и операции нахождения остатка от деления (%).