Даны три целых числа найти произведение отрицательных чисел в исходном наборе.

Begin
var (a,b,c):=ReadInteger3('Введите 3 числа->');
if (a<0) and (b<0) and (c<0)
then PrintLn('Произведение:',a*b*c) else
if (a<0) and (b<0)
then PrintLn('Произведение:',a*b) else
if (a<0) and (c<0)
then PrintLn('Произведение:',a*c) else
if (b<0) and (c<0)
then PrintLn('Произведение:',b*c) else
Println('Отрицательных нет');
end.

P.S писал на скорую руку, на телефоне, проверь, среда PascalABC.NET

Программа - это последовательность команд, которую выполняет компьютер в процессе обработки данных.

Команда - это описание операции, которую должен выполнить компьютер. Как правило, у команды есть свой код (условное обозначение), исходные данные (операнды) и результат.

Данные - это информация представлена ​​в форме, пригодной для ее передачи и обработки с компьютера. Данные хранятся и обрабатываются на машинном языке - в виде последовательностей 0 и 1

Также на виндовс есть специальная кнопка ,, Выполнять ,, или ,, Выполнить ,,. Если нужно написать о функциях команд я напишу.

Для перевода целой части необходимо умножить разряд числа на соответствующую ему степень разряда.
1Е9 = 16^2*1 + 16^1*Е + 16^0*9 = 256 + 0 + 9 = 265
Для перевода дробной части необходимо разделить разряд числа на соответствующую ему степень разряда
4 = 16^(-1)*4 = 0.25
В итоге получаем число 265.25

1100110*110010
Умножение начинаем с младших разрядов: если текущий разряд второго числа равен 0, то везде записываем нули, если 1 - то переписываем первое число. (решение столбиком прилагается. Надеюсь, поймешь:))
При суммировании в разрядах 6, 7, 10, 11 возникло переполнение. Причем переполнение возникло и в старшем разряде, поэтому записываем 1 впереди полученного числа, и получаем: 1001111101100
В десятичной системе счисления данное число имеет следующий вид:
Для перевода необходимо умножить разряд числа на соответствующую ему степень разряда.
1001111101100 = 2^12*1 + 2^11*0 + 2^10*0 + 2^9*1 + 2^8*1 + 2^7*1 + 2^6*1 + 2^5*1 + 2^4*0 + 2^3*1 + 2^2*1 + 2^1*0 + 2^0*0 = 4096 + 0 + 0 + 512 + 256 + 128 + 64 + 32 + 0 + 8 + 4 + 0 + 0 = 5100
Проверим результат умножения в десятичной системе счисления. Для этого переводим числа 1100110 и 110010 в десятичное представление.
1100110 = 2^6*1 + 2^5*1 + 2^4*0 + 2^3*0 + 2^2*1 + 2^1*1 + 2^0*0 = 64 + 32 + 0 + 0 + 4 + 2 + 0 = 102
110010 = 2^5*1 + 2^4*1 + 2^3*0 + 2^2*0 + 2^1*1 + 2^0*0 = 32 + 16 + 0 + 0 + 2 + 0 = 50
102 x 50 = 5100