Кодирование - переход от одной формы представления информации к другой, более удобной для восприятия, хранения, передачи или обработки информации.
Первая ЖИТЬ. т.к. ноль может идти только в паре с 1,2 или 3
var
a,b,c,n:integer;
begin
n:=0;
writeln("Введите 3 числа");
readln(a,b,c);
if a<0 then inc(n);
if b<0 then inc(n);
if c<0 then inc(n);
writeln("Из них ", n, " отрицательные.");
end.
Степени двойки. В ВТ система счисления - двоичная