Вопрос задан 14.01.2024 в 00:05. Предмет Информатика. Спрашивает Ткачёв Витя.

1)Проанализируй и напиши программу на языке Паскаль.
Вычислить n!, если значение n пользователь вводит с клавиатуры.

Если n=1, то на экране выводится n!=
2)Запиши программу на языке Паскаль.
Определить, является ли число, введенное с клавиатуры простым.

Перейти к ответам

Ответы на вопрос

Отвечает Сыпачева Ульяна.

Для ответа на ваш вопрос, я разработал две программы на языке Паскаль. Первая программа вычисляет факториал числа nn, введенного пользователем. Вторая программа определяет, является ли введенное с клавиатуры число простым. Вот подробное описание каждой из них:

1. Программа для вычисления факториала числа nn

pascal
program FactorialCalculator; uses crt; var n, i, fact: longint;

begin clrscr; writeln('Введите число для вычисления факториала: '); readln(n);

if n < 0 then writeln('Факториал не определен для отрицательных чисел.') else begin fact := 1; for i := 2 to n do fact := fact * i; writeln('Факториал ', n, '! = ', fact); end;

readln; end.

Эта программа просит пользователя ввести число nn, затем вычисляет факториал этого числа (если число неотрицательное) и выводит результат.

2. Программа для определения простоты числа

pascal
program PrimeNumberChecker; uses crt; var n, i: longint; isPrime: boolean;

begin clrscr; writeln('Введите число для проверки на простоту: '); readln(n);

if n <= 1 then isPrime := false else isPrime := true;

for i := 2 to n - 1 do if n mod i = 0 then begin isPrime := false; break; end;

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

readln; end.

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

Обе программы написаны с учетом стандартного синтаксиса Паскаля и могут быть скомпилированы в любой среде, поддерживающей этот язык.

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос