Структурные элементы алгоритмов. Циклические алгоритмы



бет2/3
Дата16.11.2022
өлшемі338,58 Kb.
#158483
түріЛабораторная работа
1   2   3
Байланысты:
PR 6 OAIP

Задание 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
Составьте алгоритм реализации

  1. Составьте алгоритм и напишите программу реализации следующей задачи.

Вычислить произведение натуральных чисел, кратных трем и не превышающих n.
Сохранить программу под именем Фамилия_ЛР_6_22 в своей папке.



  1. Исходные данные: заданное число n.

Выходные данные: произведение натуральных чисел, кратных трем и не превышающих n.


  1. Математическая модель: вычисления произведения натуральных чисел, кратных 3 и не превышающих n.

  2. Составляем блок-схему алгоритма.

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




Достарыңызбен бөлісу:
1   2   3




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет