close

Вход

Забыли?

вход по аккаунту

?

Алгоритм как способ организации процедурной информации

код для вставкиСкачать
урок по учебнику Гейна
Алгоритм как способ организации процедурной информации
§
14
Постановка задачи
Составить алгоритм, блок
-
схему и программу для нахождения простых множителей натурального числа n
, а также степени их вхождения в число.
Например, n = 720, n
= 2
4
+ 3
2
+ 5
1
Исходные данные: 7ϮϬ
Результат: Ϯ, ϰ, ϯ, Ϯ, ϱ, ϭ
Блок
-
схема
Запросить n
n > 1
Найти простой множитель p
Найти с
тепень вхождения s
n:=n/
p
s
Сообщить p
, s
Вспомогательный алгоритм Простой множитель
Процедура
Простой множитель
(
арг
: n
; рез
: p
)
цел:
n
, p
{p:= 2;
Делать пока
n
/
p
<> int
(
n
/
p
)
{p:=p+1;
}
}
Вспомогательный алгоритм
Степень вхождения
Процедура
Степень вхождения
(
арг
: n
, p
; рез
:
s
)
цел:
n
, p, s
Делать пока
n
/
p
= int
(
n
/
p
)
{n:=n/p;
s:=s+1}
}
Program prmn
;
Var
n: real; p1,s1:integer;
Procedure pr(k:real; var
p:integer);
Begin
p:= 2;
While int
(k/p)<>k/p do
p:=p + 1;
end;
Procedure mn
(k:real; p:integer; var
s:integer);
…
Begin
read (n);
While n<1 do
Begin
pr(n, p1);
mn
(n, p1, s1);
n:=n/exp(
ln
(p1)*s1);
writeln
(p1, s1)
end;
end.
Автор
zukovaivik
Документ
Категория
Образование
Просмотров
114
Размер файла
54 Кб
Теги
способы, алгоритм, процедурной, организации, информация
1/--страниц
Пожаловаться на содержимое документа