решить задачи на Python 1) Написать программу, позволяющую - вопрос №214811141 от МистрКрутой11 17.10.2022 03:36

Question

Информатика: решить задачи на Python 1) Написать программу, позволяющую пользователю ввести текст. Слова в тексте разделены одним или несколькими пробелами, или переносом строки. Программа должна вывести на экран количество повторений для каждого слова в этом тексте. Используйте словарь. 2) Написать программу, позволяющую пользователю ввести код активации. Программа должна проверить, был ли этот код использован ранее. Если код уже использовался - вывести строку “Данный код уже был использован”, “Продукт активирован”

МистрКрутой11 · Answer

Var
A:array[1..4] of integer;
i,j,R,P:integer;
function HOD(c,b:integer):integer;
begin
while c<>b do
if c>b
   then
   c:=c-b
else
b:=b-c;
HOD:=c;
end;
function HOK(c,b, RR:integer):integer;
begin
if ((c mod b=0) or (b mod c=0)) and ((c div b > 1) or (b div c > 1))
then
   begin
if c>b
   then
   HoK:=c
else
HOK:=b;
end
else
HOK:=(c*b) div RR;
end;
begin
A[1]:=36;
A[2]:=54;
A[3]:=18;
A[4]:=15;
P:=1;
R:=HOD(A[1],A[2]);
P:=HOK(A[1], A[2], R);
for i:=3 to 4 do
begin
R:=HOD(R, A[i]);
P:=HOK(P, A[i],R);
end; writeln('HOK = ',P);
end.