Question

Задача: Определить, является ли заданное натуральное число простым числом. Формат ввода: На вход подается натуральное число n не превосходящих 30000. Формат вывода: YES или NO Пример входных данных 27 Пример выходных данных NO P.S. На языке паскаль. 8 класс, так что не сильно заумно, пожалуйста, а то бывают команды, которые впервые в жизни вижу.

Answer 1

Если не заумно, то так сойдет)

Вот держи(прикреп):

Answer 2

Конечно, давайте решим эту задачу на языке Паскаль. Программа будет проверять, является ли заданное число простым, и выводить "YES" или "NO" соответственно. Пример кода:

program IsPrime;

var
  n, i: integer;
  isPrime: boolean;

begin
  // Ввод числа
  write('Введите натуральное число n: ');
  readln(n);

// Проверка на простоту
  isPrime := true;

if n < 2 then
    isPrime := false
  else
    for i := 2 to trunc(sqrt(n)) do
      if n mod i = 0 then
      begin
        isPrime := false;
        break;
      end;

// Вывод результата
  if isPrime then
    writeln('YES')
  else
    writeln('NO');
end.

Программа использует цикл для проверки, делится ли число `n` на какое-либо число от 2 до корня из `n`. Если делится, то число не является простым. Если не делится ни на одно из этих чисел, то число простое.