Ребят, Написать 2 программы для вычисления разности 2 чисел с использованием 2 и 3 переменных соответственно
в питоне.
134
229
Ответы на вопрос:
var n,m: integer;
f1,f2: text;
function sd(a: integer): integer;
var s,i: integer;
begin
s: =1;
for i: =2 to a div 2 do
if a mod i=0 then s: =s+i;
sd: =s;
end;
begin
assign(f1,'task2.in');
reset(f1);
assign(f2,'task2.out');
rewrite(f2);
readln(f1,n,m);
if (sd(n)=m)and(sd(m)=n)
then writeln(f2,'числа дружественные')
else writeln(f2,'числа не дружественные');
close(f1);
close(f2);
end.
пример:
файл task.in
220 284
файл task.out
числа дружественные
Популярно: Информатика
-
Asuacom01.12.2022 13:23
-
yuliua8820.11.2022 02:50
-
Викторина2215.12.2021 15:32
-
Nataliya4901701.07.2020 22:54
-
Мама1мама230.10.2021 00:05
-
nadia29124.02.2020 18:32
-
Kseniaa2624.06.2022 08:54
-
mirza2208.05.2023 05:32
-
agroDan12.06.2020 06:23
-
arinka385909.07.2021 04:18