Как в Паскале определить, является ли число простым? Желательно, чтобы программа была как можно проще.

Заранее спасибо!

Информатика 8 класс Программирование на языке Паскаль Паскаль простое число программа на Паскале определение простоты алгоритм проверки простоты код на Паскале информатика 8 класс Новый

Для того чтобы определить, является ли число простым в языке программирования Паскаль, нужно выполнить несколько шагов. Простое число — это число, большее единицы, которое делится только на 1 и само на себя. Давайте разберем, как это можно реализовать в программе.

Шаги решения:

1. Запросить у пользователя ввод числа.
2. Проверить, больше ли число 1. Если нет, то оно не простое.
3. Проверить делимость числа на все целые числа от 2 до квадратного корня из этого числа. Если найдется хотя бы один делитель, то число не простое.
4. Если делителей не найдено, то число простое.

Теперь давайте напишем саму программу:

program PrimeCheck;
var
    n, i: integer;
    isPrime: boolean;
begin
    writeln('Введите число:');
    readln(n);

    isPrime := true; // Предполагаем, что число простое

    if n <= 1 then
    begin
        isPrime := false; // Числа 1 и меньше не являются простыми
    end
    else
    begin
        for i := 2 to trunc(sqrt(n)) do
        begin
            if n mod i = 0 then
            begin
                isPrime := false; // Если нашли делитель, число не простое
                break; // Выходим из цикла
            end;
        end;
    end;

    if isPrime then
        writeln(n, ' - простое число.')
    else
        writeln(n, ' - не простое число.');
end.

Объяснение программы:

• Сначала мы объявляем переменные: n для числа, i для цикла и isPrime для хранения информации о том, является ли число простым.
• Пользователь вводит число, которое мы сохраняем в переменную n.
• Мы предполагаем, что число простое, установив isPrime в true.
• Если n меньше или равно 1, мы сразу устанавливаем isPrime в false.
• Если n больше 1, мы начинаем цикл от 2 до квадратного корня из n. Если находим делитель (n mod i = 0), то устанавливаем isPrime в false и выходим из цикла.
• В конце программы выводим результат: является ли число простым или нет.

Таким образом, мы можем просто и эффективно проверить, является ли число простым в Паскале!