Задание 3
Дано натуральное число N. Определить, является ли оно простым. Натуральное число N называется простым, если оно делится нацело без остатка только на единицу и N. Число 13 – простое, т.к. делится только на 1 и 13, N=12 не является простым, т.к. делится на 1, 2, 3, 4, 6, 12. Алгоритм решения этой задачи заключается в том, что число N делится на параметр цикла i, изменяющийся в диапазоне от 2 до N/2. Если среди значений параметра не найдется ни одного числа, делящего заданное число нацело, то N – простое число, иначе оно таковым не является.
1
Блок-схема
10
11
9
8
7
6
5
4
3
2
Код
Program PRCH;
Var
N, i: integer;
Pr: boolean;
begin
writeln ('N= ');
readln(N);
Pr:=true;
for i:=2 to N div 2 do
if N mod i=0 then
begin
PR:=false
break;
end;
if Pr then
writeln('Число ', N, ' - простое ' )
else
writeln('Число ', N, ' простым не является ')
end.
Задания уровня 2
Составьте алгоритм реализации
Составьте алгоритм и напишите программу реализации следующей задачи.
Вычислить произведение натуральных чисел, кратных трем и не превышающих n.
Сохранить программу под именем Фамилия_ЛР_6_22 в своей папке.
Исходные данные: заданное число n.
Выходные данные: произведение натуральных чисел, кратных трем и не превышающих n.
Математическая модель: вычисления произведения натуральных чисел, кратных 3 и не превышающих n.
Составляем блок-схему алгоритма.
7
8
6
5
4
3
2
1
Кодирование:
Рисунок 1 - Программный код, вычисляющий произведение натуральных чисел, кратных трем и не превышающих n.
.
Тестировка с помощью Excel
|
№1
|
№2
|
№3
|
№4
|
№5
|
n
|
6
|
3
|
9
|
12
|
13
|
произведение
|
3
|
9
|
162
|
1944
|
1944
|
Достарыңызбен бөлісу: |