Question

Даны два числа, не равных нулю. Определить, имеют ли эти числа одинаковые знаки.

Answer 1

Ответ:

Free Pascal

Объяснение:

вариант такой: представим числа как строку и будем смотреть вхождение каждого символа во второе число(строку).

var

 a, b : string;

 i : integer;

begin

 a:='79123456';

 b:='0123579';

 for i:= 1 to length(a) do

   if Pos(a[i], b) > 0 then

     write(a[i])

end.

Answer 2

Для определения, имеют ли два числа одинаковые знаки, вы можете сравнить знаки чисел, выполнив следующие шаги:

1. Получите два числа от пользователя или используйте их из каких-либо источников.

2. Проверьте знаки чисел с помощью условных операторов (if-else). Вы можете использовать операторы сравнения для определения знаков чисел. Например:

   • Если оба числа положительные (больше нуля), то они имеют одинаковые знаки.
   • Если оба числа отрицательные (меньше нуля), то также они имеют одинаковые знаки.
   • Если одно из чисел положительное, а другое отрицательное, то они имеют разные знаки.

Вот пример на псевдокоде:

pythonCopy code
число1 = получить_первое_число()
число2 = получить_второе_число()

если число1 > 0 и число2 > 0:
    вывести("Оба числа положительные, знаки одинаковы.")
иначе если число1 < 0 и число2 < 0:
    вывести("Оба числа отрицательные, знаки одинаковы.")
иначе:
    вывести("Числа имеют разные знаки.")

Этот псевдокод поможет вам определить, имеют ли два заданных числа одинаковые знаки.