Будем называть два числа дружественными, если они состоят из одних и тех же цифр. например, числа 1132 и 32321 является дружественными, а 12 и 123 нет (в первом числе нет цифры 3). напишите программу, определяющую являются ли два заданных числа дружественными.
входные данные: ввести два целых числа a и b, разделенных одним пробелом, (0
выходные данные: вывести сообщение yes, если a и b являются дружественными, или no, если не являются.
162
272
Ответы на вопрос:
ответ:
program friendly;
uses
sysutils; // для inttostr
var
a, b, i, pa, pb: longint;
sa, sb: string;
f: boolean;
begin
write ('a, b = ');
readln (a, b);
sa : = inttostr (a);
sb : = inttostr (b);
f : = true;
for i : = 0 to 9 do begin
pa : = pos (inttostr (i), sa);
pb : = pos (inttostr (i), sb);
if ((pa < > 0) and (pb = 0)) or ((pa = 0) and (pb < > 0)) then begin
f : = false;
break;
end;
end;
if f then
writeln ('yes')
else
writeln ('no');
readln;
end.
Var numb,k,summa: integer; begin readln(numb); for k: = 1 to (numb-1) do begin if numb mod k = 0 then summa: =summa+k; end; if summa = numb then writeln('совершенное') else writeln('несовершенное'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
его1824.07.2022 19:14
-
neponyatkiii29.01.2021 14:27
-
konstantin195901.07.2020 15:16
-
sametovarnur30.03.2021 21:26
-
rrxxmarta24.12.2020 15:27
-
eaglez91Aidana22.09.2022 08:29
-
stalker200000804.04.2022 13:36
-
okolota0506.02.2023 00:08
-
trinadsyear11.07.2020 06:06
-
Umnikin09.12.2022 02:05
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.