<em>Устройство ввода - клавиатура</em>
9b5 -> 100110110110 -> 4666
<span>var a,b,res:integer;
begin
write('a = '); readln(a);
write('b = '); readln(b);
if (a<0)and(b<0) then res:=a+b else res:=a*b;
writeln('Результат = ',res);
end<span>.
Пример:
</span><span>a = -5
b = 8
Результат = -40
Блок-схема - в прилагаемом файле.</span></span>